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Editorial 



SACALE PARTIDO A TU 
ORDENADOR 



Después de la compra del nuevo ordenador o de 
haber completado tu equipo con nuevos periféricos, 
ha llegado el momento de que te pongas a trabajar 
en serio con ellos y deshechar la tentación fácil de 
aparcarlos en un rincón. Como siempre, INPUT te 
ofrece la posibilidad de combinar el aprendizaje de 
las técnicas de programación y la información de las 
novedades de hardware, con el juego, la enseñanza 
de trucos útiles y el seguimiento de los más intere- 
santes programas que se publican. 

Conscientes de que el mundo de la informática vive 
un movimiento permanente, del que los medios de 
comunicación no debemos prescindir, hemos confec- 
cionado una encuesta, con cuyas respuestas espera- 
mos poder sintonizar mejor con vosotros. A fin de 



que os resulte más sugestiva, se efectuará un sorteo 
entre todas las contestaciones recibidas. 

Por último, hemos de señalar que con la publica- 
ción de este número de INPUT inauguramos un 
nuevo Concurso de Aplicaciones y Utilidades, desti- 
nado a intentar ampliar la gama de servicios que os 
prestan vuestros ordenadores. 

A nuestro juicio, esta nueva competición estimu- 
lará un importante intercambio de experiencias y 
permitirá introducir nuevos temas en vuestra revista. 

Sin duda, vuestras respuestas serán tan entusiastas 
como en anteriores ocasiones, lo que elevará la ca- 
lidad y el interés de la revista. 

Así pues a DISFRUTAR de vuestro INPUT y... a 
PARTICIPAR. 



LOS MEJORES DE INPUT 

Hemos pensado que es interesante disponer de un ranking que El resultado de las votaciones será publicado en cada número 

ponga en claro, mes a mes, cuáles son los programas preferidos de INPUT. 

de nuestros lectores. Para ello, es obligado preguntaros directamen- Entre los votantes sortearemos 10 cintas de los títulos que pidáis 

te y tener así el mejor termómetro para conocer vuestras preferen- en vuestros cupones. 

cias. Podéis votar por cualquier programa aunque no haya sido co- Nota: No es preciso que cortéis la revista, una copia hecha a 

mentado todavía en INPUT. máquina o una simple fotocopia sirven. 

Enviad vuestros votos a: LOS MEJORES DE INPUT Aribau, 185. Planta 1. 08021 Barcelona 
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Aplicaciones 



MUSICA Y SIMULACION 
DE PARTITURAS 



El sistema MSX lleva incorporado un 
chip que es el encargado de darle el so- 
nido al ordenador, conocido por su gran 
capacidad. En este artículo te brinda- 
mos la oportunidad de iniciarte en la 
composición musical de la mano de tu or- 
denador. 

Si os fijáis, cuando trabajamos con 
el microordenador, nos acompañan 
una serie de sonidos que nos indican 
funciones; o bien, cuando jugamos y 
oímos campanas, disparos, canciones 
y efectos en general. Pues bien, este 
pequeño programa que presentamos 
interpreta una melodía que hemos se- 
leccionado. 

No es nuestra intención dar una 
clase de música, para lo que debéis ir 
al conservatorio, sino divulgar una cu- 
riosidad de nuestro ordenador que 
creemos interesante. 

Lo que sí explicaremos es cómo he- 
mos confeccionado el programa, ya 
que es posible que algún aficionado, 
además de escuchar la canción que 
proponemos, quiera hacer un pro- 
grama para escuchar su composición 
predilecta. 

Para ello es preciso partir de una 
partitura que debemos codificar, des- 
componiéndola en notas separadas y 
silencios, seleccionando según lo com- 
pleta que queramos la pieza, en me- 
lodía principal, primera voz, segunda 
voz, etcétera. 

Una vez estudiada la partitura se 
trata de codificar cada nota en su letra 
correspondiente, respetando los silen- 
cios, duración de cada nota y octava a 
que pertenece. 

Visto así quizá quede un tanto com- 
plejo, pero no lo es, simplemente re- 
quiere un poco de atención. 

La primera vez es muy posible que 
la canción no suene como debiera, ya 
que es fácil olvidar un sostenido o con- 
fundir un tiempo, pero... ¡adelante! 

Para que podáis ver el desarrollo 
que hay que seguir, os ad juntamos con 



el programa un ejemplo de una pieza 
musical, y la partitura empleada. 

Hemos tomado como muestra un 
fragmento de la Cantata N. 147 de J. 
S. Bach, analizando los 8 primeros 
compases, que son tal vez la parte más 
conocida y que define el dibujo mu- 
sical de la obra. 



DESCRIPCION DEL PROGRAMA 

En primer lugar hay que definir los 
parámetros generales: volumen de 
cada canal y velocidad. 

Esta labor se realiza en las instruc- 
ciones 190, 200 y 210. 

Cada una de estas instrucciones se 
cuida de un canal del PSG A Y3-8910 
(Programable Sound Generator), que 
puede controlar hasta tres canales a la 
vez. 

Las variables que hemos utilizado 
para cada canal son: 

R ... para la melodía principal 
S ... para la segunda voz 
T ... para los bajos o tercera 
voz. 

De la instrucción 220 a 450 vemos 
los códigos de la pieza interpretados 
de la siguiente forma: hemos separado 
la composición en ocho partes, ha- 
ciendo coincidir cada una con un com- 
pás. A su vez, se dividen en tres ca- 
nales, es decir, para cada compás hay 
que definir una R, una S y una T. 

La instrucción 460 se encarga de 
programar las variables que caracte- 
rizan a la melodía y, por último, desde 
la instrucción 470 a 550, interpreta los 
ocho compases secuencialmente. 

Podemos modificar la interpreta- 
ción de nuestra melodía si cambiamos 
el contenido de los primeros paráme- 
tros, creando así nuevas versiones, 
como por ejemplo: 

190 RO$="T240V10S1M3000" 

En la que el canal 1 se ve afectado 
por una envolvente de una sola vez 



por nota, y en forma de diente de sie- 
rra descendente. 

No altera los canales 2 y 3. 

Otro caso podría ser: 

190 RO$ = "T240V10S14M300" 

Causa una modulación de baja fre- 
cuencia de forma de onda triangular 
en el canal 1, y no altera los canales 2 

y 3. 

Un consejo importante para cuando 
codifiquemos nuestras melodías es el 
verificar que la duración de cada com- 
pás sea siempre la misma para todas 
las voces y en todos los compases, esto 
puede servirnos de referencia para de- 
tectar errores de codificación. 

Con lo descrito en este artículo, 
queremos fomentar la creación de par- 
tituras codificadas para MSX entre 
nuestros lectores. 

Aprovechamos la ocasión para in- 
formar que en un número próximo de 
nuestra revista publicaremos las bases 
de un concurso de canciones y efectos 
sonoros en el que podéis participar to- 
dos vosotros y donde habrán impor- 
tantes premios para los ganadores. 
¡Así que ánimo y... a la canción! 

100 REM ****** ************ * 
110 REM * 

120 REM * Cantata N147 
J.S.Bach. 

130 REM * 

140 REM * Por: AY3-8910 
150 REM * 
160 REM * 
170 REM * 

180 REM ******************* 
190 R0$ = *'T240V10" 
200 S0$="T240V9" 
210 T0$ = '*T240V9" 
220 R1$="04RGAB05DCCED" 
230 S1$="04RRRGGF+GGA" 
240 T1$="02GGR03GGREER" 
250 R2$="05DGF+GD04BGAB" 
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Jesús, alegría de los hombres 

Cantata N.° 147 



Simple 



J. S. Bach 





1 



71 «r^ 




260 S2$= 
270 T2$= 
280 R3$= 
290 S3$= 
300 T3$= 
310 R4$ = 

4BA' 
320 S4$ 

+ " 
330 T4$ 
340 R5$ 
350 S5$ 
360 T5$ 



"04BBABBGEED" 
"02BBR03EER03BB" 
"05CDEDC04BABG" 
"04EEF+EEDEE03B" 
"02AARBBR03CCR" 
= "04F + GADF + A05C0 

="04CCD03AA04GAAF 

="03DDRF+F+RDDR" 
"04BGAB05DCCED" 
"04GGF+GGF+GGA" 
"03GGRGGRCCR" 



370 R6$="05DGF+GD04BGAB 

380 S6$="04BBABBGEEG" 
390 T6$="02BBR03EER03DD 
R" 

400 R7$="05EDC04BAGDGF+ 

410 S7$="04AAF+GGE03AA0 
4C" 

420 T7$ = "03CCRC + C + RDDR" 
430 R8$="04GB05DGD04BGB 

05DGG" 
440 S8$="04DDGBBD03BB04 



GGG" 

450 T8$="02GGRRRGDD02BG 
G" 

460 PLAYR0$,S0$,T0$ 
470 PLAYR1$,S1$,T1$ 
480 PLAY R2$,S2$,T2$ 
490 PLAY R3$,S3$,T3$ 
500 PLAY R4$,S4$,T4$ 
510 PLAY R5$,S5$,T5$ 
520 PLAY R6$,S6$,T6$ 
530 PLAY R7$,S7$,T7$ 
540 PLAY R8$,S8$,T8$ 
550 END 
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DISEÑA CON 
TU RATON 



Muchos de vosotros disponéis ahora 
de una valiosa herramienta de trabajo: 
el ratón. Con el presente artículo pre- 
tendemos comentar la importancia 
que esta utilidad del ordenador su- 
pone como avance tecnológico dentro 
del campo del diseño. 

Tras la introducción en el tema, co- 
mentaremos un programa que inclui- 
mos en este número, con el que po- 
dréis realizar pequeños diseños gráfi- 
cos. Lo que sí es muy importante y 
queremos dejar bien sentado es que 
en ningún momento hemos preten- 
dido con este programa hacer diseño 
asistido por ordenador, ya que eso es 
totalmente distinto, requiere una es- 
pecialización y unos terminales gráfi- 
cos con una memoria y prestaciones 
muy superiores a la de nuestro mi- 
croordenador. 



Cuando hablamos de diseño asistido 
por ordenador o fabricación asistida 
por ordenador (CAD/CAM), estamos 
hablando de ciertas técnicas que aun- 
que nos parecen muy recientes, se han 
estado utilizando desde finales de los 
años 60 en el campo del diseño de tar- 
jetas de circuito impreso y en el de tra- 
zado de circuitos integrados. 

En 1981 aparecieron las primeras 
estaciones de trabajo CAE (estaciones 
de trabajo asistido por ordenador en- 
focadas a la ingeniería), que contem- 
plaban la automatización de las fases 
preliminares del diseño electrónico. 
Como consecuencia surgió el mercado 
ECAD (Diseño electrónico asistido 
por ordenador). 

Actualmente existen estaciones de 
trabajo para todo tipo de aplicaciones, 
es decir, que no queda limitado al 



campo de la electrónica, sino que se 
emplea en el diseño mecánico, arqui- 
tectura, ingeniería y construcción. Se 
prevé que hacia el año 1989 los ter- 
minales de trabajo tendrán el precio y 
las dimensiones de un ordenador per- 
sonal actual. 

A título informativo os diremos que 
las especificaciones técnicas mínimas 
que se precisan para poder realizar 
aplicaciones de ECAD son: 

— Poseer tarjetas controladoras de 
gráficos B/N y Color con una defini- 
ción de 1024 * 1024 pixels con pres- 
taciones de «paning» y «zoom». 

— Entre 1 y 4 Mbytes de RAM. 

— Una capacidad en disco de 40 o 
50 Mbytes. 

La meta de este sistema de trabajo 
es conseguir el intercambio de datos 
con otras estaciones de trabajo o 
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transferir ficheros a ordenadores más 
potentes, compartiendo periféricos y 
bases de datos a través de redes de co- 
municación locales. 

La idea se centra pues en conectar 
al ordenador central, que se halla en 
la empresa, las diferentes estaciones 
de diseño además de los terminales 
normales de gestión ya existentes. 

Los ordenadores de diseño funcio- 
nan de una forma interactiva, lo- 
grando una comunicación bidireccio- 
nal hombre-máquina de una forma có- 
moda y rápida, mediante el lápiz lu- 
minoso (light-pen), o bien, empleando 
la denominada tableta gráfica, la cual 
está más extendida. 

Las tabletas gráficas disponen de un 
apartado o ventana donde se pueden 
especificar puntos concretos, y selec- 
cionar zonas del dibujo, en las que se 
desea realizar una función. 

En otra parte de la tableta se mues- 
tran gran cantidad de funciones pre- 
definidas, como, por ejemplo, trazar 
un círculo, dado el centro y el radio, 
trazar círculos que pasen por tres pun- 
tos dados, diversas tangentes, efectos 



de rotación y simetrías, dibujo de rec- 
tángulos, cónicas, etc., que permiten 
aligerar el tiempo de realización del 
diseño. Asimismo contempla una serie 
de prestaciones que pueden ser defi- 
nidas por el usuario, que le van a per- 
mitir personalizar la máquina en fun- 
ción de su trabajo. 

Los diseños realizados quedan re- 
tenidos en el disco, y pueden ser lla- 
mados de nuevo para hacer servir 
parte de los mismos. 

Una ventaja importantísima de este 
sistema de trabajo se centra en la co- 
municación. En todo momento se 
puede conocer el estado de cualquiera 
de las fases del proyecto, llevadas por 
distintos colaboradores, debido a que 
funcionan en paralelo y están unidas 
por una red de comunicación. 

EL PROGRAMA 

Tal y como citábamos al comienzo 
de este artículo, el programa presen- 
tado es un sencillo ejemplo, y dista 
mucho de lo que sería un programa de 
diseño asistido por ordenador, si bien 



puede satisfacer muchas de tus nece- 
sidades sí ansias disponer de un pro- 
grama que te permita dibujar a tu an- 
tojo en la pantalla, sin verte obligada 
a realizar cálculos para obtener resul- 
tados gráficos. 

Este pequeño programa permite di- 
bujar trazos en la pantalla gráfica del 
sistema, de una forma asimétrica y de- 
senfadada. Con esto abrimos una 
puerta a la creación y al ingenio del 
lector que desee definir motivos o ca- 
rátulas que servirán de presentación a 
sus programas, juegos, o, incluso para 
las presentaciones de sus películas de 
video doméstico. 

El programa presenta una pantalla 
a modo de página para dibujar, en la 
cual podemos seleccionar el color del 
borde, el color del papel de fondo, y, 
por último, el color de la tinta a em- 
plear. 

El programa puede trabajar hasta 
con 4 pantallas (0, 1, 2, 3) simultánea- 
mente de 256 x 212 pixels y 16 colo- 
res. 

Una vez tengamos las pantallas 
completas, tenemos la opción de guar- 
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darlas en el disco para emplearlas 
desde otros programas. 

Si queremos revisar un dibujo ya al- 
macenado en el disco, lo podemos car- 
gar en la pantalla 0. Incluso una vez 
cargado podemos modificarlo, cam- 
biar los colores del borde y del papel, 
y guardarlo de nuevo. 

Para dibujar emplearemos el ratón 
del sistema, que adquiere la persona- 
lidad de un lápiz o puntero. 

Al desplazarlo por encima de la 
mesa, vemos correr su imagen por la 
pantalla a modo de cursor. Si quere- 
mos que deje rastro por donde pasa, 
o sea, que dibuje, debemos apretar el 
pulsador de la izquierda del mismo. 

Es muy fácil que deseemos borrar 
alguno de los trazos realizados. Para 
ello disponemos de dos gomas, una a 
nivel de pixel, que borra por el simple 
hecho de volver a pasar el ratón por 
encima del dibujo, y otra a nivel de ca- 
rácter, que funciona al desplazar el 
cursor manteniendo apretada la barra 
espaciadora. 



Para cambiar el color del papel, lo 
podemos hacer de dos formas. El co- 
lor inicial lo definiremos con H 
(hoja), indicándole a continuación un 
número del 0 al 7 de la paleta (+,— ) 
previamente seleccionada, o bien, T 
(papel) y el color a continuación. Esta 
segunda función respeta el dibujo 
existente sin alterarlo, pero es mucho 
más lenta en su ejecución, debido a 
que debe consultar el color de cada 
punto antes de alterarlo. 



Otra particularidad es que nos per- 
mite seleccionar hasta 16 colores si- 
multáneamente dentro de la misma 
pantalla. 

Para cambiar de color debemos pul- 
sar *C y el color deseado. 

Antes de emplear algún comando 
de selección de color debemos selec- 
cionar la paleta a que nos vamos a re- 
ferir. Existen dos paletas de ocho co- 
lores cada una que describimos a con- 
tinuación: 



Código 


Paleta baja (-) 


Paleta alta ( + ) 


0 


Transparente 


Rojo 


1 


Negro 


Rojo claro 


2 


Verde 


Amarillo oscuro 


3 


Verde claro 


Amarillo claro 


4 


Azul oscuro 


Verde oscuro 


5 


Azul claro 


Magenta 


6 


Rojo oscuro 


Gris 


7 


Azul cielo 


Blanco 



Disponemos de otra opción que es 
la de rellenar masas de color, es decir, 
una vez disponemos de una línea lí- 
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mite cerrada (prestar atención a que 
no se salga la tinta), debemos situar el 
cursor dentro de la zona a rellenar y 
entrar el comando T. 

Para evitar que al entrar o salir de 
la figura, el cursor borre la línea límite 
(permitiendo que al rellenar se salga la 
tinta), podemos inhibir el cursor con 
la tecla F2. El cursor volverá a apa- 
recer al pulsar de nuevo esta tecla. 

Si seleccionamos el mismo color de 
papel y tinta, lógicamente el cursor se 
perdería, pues bien, el programa lo 
tiene en cuenta y no nos permite po- 
ner el color de la tinta igual a la del 
papel, y viceversa, ni el color del papel 
igual al de la tinta seleccionada en ese 
momento. 

Por la misma razón, si deseamos bo- 
rrar todo lo dibujado en un determi- 
nado color, podemos cambiar el papel 
a ese color, volviendo a cambiar des- 
pués al color deseado. De esta forma 
el color que queremos borrar quedará 
absorbido. 

Hasta ahora sólo hemos definido las 
funciones de dibujo simple con el cur- 
sor, pero el programa tiene también la 
posibilidad de dibujar estructuras bá- 
sicas, como son líneas, rectángulos y 
círculos. Esta parte la descubrimos a 
continuación: Si deseamos dibujar una 
línea, situaremos el cursor en el ori- 
gen, y teclearemos el comando "1 (ini- 
cio). A continuación desplazaremos el 
ratón hasta la posición final y teclea- 
remos el comando L (línea). Inme- 
diatamente aparecerá una línea 
uniendo los dos puntos. 

Es de notar que el punto inicial no 
se pierde hasta definir un nuevo punto 
inicial, así pues podemos dibujar otra 
línea desplazando el ratón, y te- 
cleando de nuevo X (línea). 

Por ejemplo, para dibujar un trián- 
gulo, el proceso sería el siguiente: 

— Llevar el cursor al primer vértice 

— Teclear T (Inicio) 

— Llevar el cursor al segundo vér- 
tice 

— Teclear *L (Línea) 
— Llevar el cursor al tercer vértice 
— Teclear A L (Línea) y T (nuevo 
Inicio) 

— Llevar el cursor al segundo vér- 
tice 

— Teclear A L (Línea) 



Si, además, lo queremos rellenar, 
debemos inhibir el cursor (mediante la 
función F2), observando que el trián- 
gulo quede completo y desplazar li- 
geramente el cursor hacia el interior 
del triángulo. Pulsar de nuevo F2 para 
verificar que el cursor se halla en el in- 
terior de la figura, y pulsar entonces 
F (Fill = Llenar). 

Si queremos trazar figuras poligo- 
nales debemos enlazar secuencias T 
X, obteniendo líneas encadenadas. 

Otra opción que nos brinda este 
programa es la de dibujar cuadrados 
dados dos vértices opuestos. 

Para hacerlo debemos ir a un vértice 
y teclear T (Inicio). 

Seguidamente desplazaremos el 
cursor hasta el vértice opuesto, y te- 
clearemos *Q (Cuadrado), e inmedia- 
tamente aparecerá un cuadrado en la 
pantalla. 

Como podemos observar, el vértice 
inicial es el mismo que hemos hecho 
servir para trazar líneas, por tanto po- 
demos trazar líneas desde el vértice de 
este cuadrado sin hacer nada especial. 
Esta función servirá también para en- 
cadenar figuras geométricas. 

Por último, el programa nos da la 
posibilidad de dibujar círculos, para 
ello, debemos situar el cursor en el 
centro y definirlo como punto inicial 
(T) y a continuación, situar el cursor 
en cualquier punto del círculo a trazar, 
y teclear seguidamente el comando 
fO), inmediatamente aparecerá un 
círculo, que como en los anteriores ca- 
sos, se puede rellenar. 

Si deseamos círculos concéntricos, 
no debemos redefinir el centro. 

Otra parte del programa es la rela- 
cionada con el almacenamiento de los 
dibujos en el disco. Con tal objeto, 
disponemos de dos comandos: 

La tecla de función (F3) ordena el 
almacenamiento en disco de la pan- 
talla corriente. Para no modificar el 
dibujo sobreponiendo caracteres, el 
mismo programa crea un nombre para 
este archivo. 

El nombre se compone de los ca- 
racteres «CD» seguidos de seis cifras, 
que son las indicadas por la variable 
TIME y la extensión «.dat» para in- 
dicar que se trata de un archivo de da- 
tos. 



Es muy difícil que en dos sesiones 
de diseño, aun empleando el mismo 
disco, se realice una escritura en el 
mismo instante, pero es recomenda- 
ble, una vez finalizada la sesión, ad- 
judicar un nombre más apropiado al 
archivo que contiene el dibujo, em- 
pleando el comando ÑAME del sis- 
tema operativo. 

Después de guardar el diseño el 
programa continúa, así que podemos 
guardar estados intermedios de un di- 
bujo y presentarlos después en se- 
cuencia por un programa que se en- 
cargue de leerlos del disco y presen- 
tarlos en pantalla. 

El guardar un dibujo en el disco no 
altera el contenido de las otras tres 
pantallas gráficas. 

Para visionar dibujos anteriores, el 
programa dispone de la función (F4) 
(carga de dibujo) que posibilita pasar 
un archivo a la pantalla cero (observa 
que sólo se permite en la pantalla 
cero). 

Debido a que dicho comando des- 
truye la información de esta pantalla, 
el programa dispone de una protec- 
ción. Inmediatamente después de pul- 
sar (F4) debemos pulsar la letra «D». 
Cualquier otra combinación aborta la 
ejecución de este comando. 

Si pulsamos (F4) y «D», aparece en 
la pantalla el directorio del disco, para 
poder seleccionar el archivo a cargar. 

Cuando lo tenemos seleccionado, 
basta con pulsar cualquier tecla para 
que el ordenador nos pregunte por el 
nombre de dicho fichero. Para evitar 
errores, el programa toma la precau- 
ción de comprobar que el nombre del 
archivo tenga la extensión «.dat», ya 
que de lo contrario, ignora el co- 
mando. 

Si todo es correcto, se cargará en la 
pantalla cero el dibujo almacenado en 
el disco (nótese que el cursor pasa a 
modo inactivo). 

Hemos comentado las prestaciones 
en cuanto a selección y cambio de co- 
lores, dibujo simple empleando el ra- 
tón, dibujos geométricos, rellenado de 
figuras, y lectura/escritura de diseños 
en disco. Pero aún nos queda otra po- 
sibilidad que es la de escribir texto en 
la pantalla. Basta con situar el cursor 
en el lugar deseado y pulsar la tecla 
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del carácter a escribir. Podemos es- 
coger entre mayúsculas, minúsculas, 
símbolos y números; sólo están pro- 
hibidos los signos 4- y - que están re- 
servados para cambiar la paleta de co- 
lores. 

Para finalizar el programa, debemos 
emplear la tecla (F5), ya que se ha in- 
hibido el stop, destruyendo los con- 
tenidos de las pantallas y restaurando 
el ordenador al sistema operativo 
MSX. 

El programa, pese a sus grandes 
prestaciones, es de tamaño reducido, 
lo que hará más fácil la introducción 
en nuestro ordenador, empleando un 
tiempo mínimo. 

Al estar realizado en forma estruc- 
turada y modular, permite realizar 
modificaciones y ampliaciones muy fá- 
cilmente, por tanto vosotros mismos 
podréis añadir ciertas funciones nue- 
vas que seguramente enriquecerán el 
programa. 



TECLAS DE FUNCION 

Fl Pasa a la siguiente pantalla 

(0,1,2,3) 

F2 Cursor visible/invisible. 

F3 Salvar en disco. 

F4 Cargar en pantalla cero (pulsar 

D) 

F5 Fin de programa 



COMANDOS 

~N Borra la pantalla corriente. 
X Cambia el color de la tinta. 
~B Cambia el color del borde. 
T Cambia el color del papel (sin 
borrar). 

T Rellena hasta el límite. 
~H Cambia el color del papel 
(borrando). 

*l Fija el punto de referencia. 
A L Traza una línea desde la 
referencia. 

*Q Traza un rectángulo desde la 
referencia. 

"0 Traza un círculo con centro en 
la referencia. 

- Selecciona paleta de colores 
bajos. 
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+ Selecciona paleta de colores 
altos. 



RESUMEN DE LAS VARIABLES 
EMPLEADAS EN EL PROGRAMA. 
P Pantalla corriente (0..3) 
C0(4) Color de la tinta en la 

pantalla. 
PA(4) Color del papel en la 

pantalla. 
B0(4) Color del borde en la 

pantalla. 
SC Paleta seleccionada (0/ 

8). 

AN Ancho de la pantalla. 
AL Altura de la pantalla. 

X, Y Coordenadas 

temporales. 
XN,YN Coordenadas corrientes. 
X0,Y0 Coordenadas anteriores. 

XI, Yl Coordenadas de 

referencia. 
A$ Buffer de carácter. 
EN Permiso de cursor (0/1) 



100 1 ********************** 
110'* 

120 ' * Programa de dibujo 
asistido 

130 * * 

140 ' * por ordenador. 
150 '* 

160 ' * (msx-dos) 
170 * * 

180 1 ********************** 
190 ' 

200 ' GUIA RAPIDA DEL 

USUARIO. 

210 ' 

220 1 Fl Siguiente pag (0,1,2,3) 
230 ' F2 Punto (visible/invisible) 
240 1 F3 Guardar en disco la 

pant. 

250 ' F4 Cargar pant. 0 ("D") 
260 ' F5 Fin de programa. 
270 ' 

280 ' *N Borra la pant. corriente 
290 ' X Color de la tinta 
300 ' "B Color del borde 



310 ' *P Color del papel (lento) 
320 ' T Rellenar contorno 
330 ' "H Color papel 

destruyendo! 
340 ' 'I Fijar punto de ref. 
350 ' "L Trazar línea desde ref. 
360 1 "Q Rectángulo desde ref. 
370 ' "0 Circulo desde ref. 
380 ' 

390 ' - Col. bajos (0..7) 
400 ' + Col. altos (0..7) (+8) 
410 1 
420 ' 

430 ' INICIALIZACIONES. 

440 ' 

450 ON STOP GOSUB 2090 
460 STOPON 
470 KEYOFF 

480 ON KEY GOSUB840.940, 

950,1050,2140 
490 KEY(l) 0N-.KEY(2) 

0N:KEY(3) ON 
500 KEY(4) 0FF:KEY(5) ON 
510 SCREEN 5 
520 OPEN "GRP:" AS #1 
530 DIM C0(4),PA(4),B0(4) 
540 FOR P=3 TO 0 STEP -1 
550 SET PAGE P,P 
560 C0(P) = 3:PA(P) = 6:B0(P) = 

8 

570 COLOR C0(P),PA(P),B0(P) 

580 CLS 

590 NEXT P 

600 P=0 

610 EN = 1 

620 SC=0 

630 AN = 255:AL=211 
640 XN=0:YN = 0:XO=0:YO=0 
650 CLS 
660 * 

670 ' BUCLE PRINCIPAL 
RAPIDO. 

680 ' 

690 A=PAD(12) 

700 XN = X0 + PAD(13):YN = Y0 + 

PADÜ4) 
710 IF XN<0 THEN XN=0 
720 IF XN>AN THEN XN = AN 
730 IF YN<0 THEN YN=0 
740 IF YN>AL THEN YN = AL 
750 IF EN=1 THEN PSET (XN, 

YN) 



760 IF EN = 1 AND STRIG(1) = 0 
THEN PRESET (XO.YO) 

770 XO=XN:YO = YN 

780 A$ = INKEY$ 

790 IF A$< > "" THEN GOSUB 
1220 

800 GOTO 690 

810 ' 

820 ' (Fl) SIGUIENTE PAGINA 

830 '— - — 

840 P=(P+l)MOD 4 

850 IF P=0 THEN KEY(4) ON 

ELSE KEY(4) OFF 
860 PRESET (XO.YO) 
870 PRESET (XN.YN) 
880 SET PAGE P,P 
890 COLOR CO(P),PA(P),BO(P) 



900 RETURN 
910 ' 

920 ' (F2) CURSOR (S/N) 

930 ' 

940 EN = (EN + 1) MOD 

2:RETURN 
950 ' 

960 ' (F3) SALVAR EN DISCO' 

970 ' - 

980 A$ = STR$(TIME) 
990 A$ = RIGHT$ (A$,LEN(A$) - 
1) 

1000 IF LEN(A$) >6 THEN 
A$ = RIGHT$(A$,6) 

1010 IF LEN(A$) <6 THEN 

A$ = "0" + A$:GOTO 1010 

1020 A$ = "DB" + A$ +".DAT" 



1030 COPY (0,0) - (256, 212), P 

TO A$ 
1040 RETURN 
1050 ' 

1060 1 (F4) CARGAR DE DISCO 

1070 ' - - 

1080 D$ = INKEY$:IF D$ = " " 

GOTO 1080 
1090 IF D$< >"D" GOTO 1210 
1100 SCREEN 0:CLS 
1110 FILES 

1120 D$ = INKEY$:IF D$ = " " 

GOTO 1120 
1130 CLS 
1140 LOCATE 0,16 
1150 INPUT "Nombre completo 

del archivo a leer :"¡ D$ 
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1160 SCREEN 5 

1170 IF RIGHT$(D$,4) < > 

*'.dat" GOTO 1200 
1180 COPY D$ TO (0,0), 0 
1190 EN = 0 
1200 SET PAGE P,P 
1210 RETURN 
1220 ' 

1230 ' SERVICIO DE 

COMANDOS. 

1240 ' 

1250 IF A$=CHR$(14) THEN 

CLS:RETURN 
1260 IF A$ = CHR$(3) THEN 

GOSUB 1400:RETURN 
1270 IF A$=CHR$(2) THEN 

GOSUB 1490:RETURN 
1280 IF A$=CHR$(16) THEN 

GOSUB 1570:RETURN 
1290 IF A$ = CHR$(8) THEN 

GOSUB 1710:RETURN 
1300 IF A$="+" THEN 

SC=8:RETURN 
1310 IFA$="-"THEN 

SC = 0:RETURN 
1320 IF A$=CHR$(6) THEN 

GOSUB 1800:RETURN 
1330 IF A$=CHR$(9) THEN 

GOSUB 1850:RETURN 
1340 IF A$ = CHR$(12) THEN 

GOSUB 1900:RETURN 
1350 IF A$ = CHR$(17) THEN 

GOSUB 1950:RETURN 
1360 IF A$ = CHR$(15) THEN 

GOSUB 2030:RETURN 
1370 PRINT #1,A$ 
1380 RETURN 
1390 ' 

1400 ' ( "O COLOR DE LA 
TINTA. 

1410 ' 

1420 A$ = INKEY$:IF A$ = " " 

GOTO 1420 
1430 IF A$<"0" OR A$>"7" 

GOTO 1420 
1440 IF PA(P)=VAL(A$) + SC 

GOTO 1470 
1450 CO(P)=VAL(A$) + SC 
1460 COLOR CO(P) 
1470 RETURN 
1480 ' 

1490 ' ( *B) COLOR DEL BORDE. 



1500 ' 

1510 A$ = INKEY$:IF A$ = " " 

GOTO 1510 
1520 IF A$<"0" OR A$>"7" 
GOTO 1510 

1530 BO(P) = VAL(A$) + SC 
1540 COLOR ,,BO(P) 
1550 RETURN 
1560 1 

1570 ' ( *P) COLOR DEL PAPEL. 

1580 1 

1590 A$ = INKEY$:IF A$ = " " 

GOTO 1590 
1600 IF A$<"0" OR A$>"7" 

GOTO 1590 
1610 IF CO(P)=VAL(A$) + SC 

GOTO 1700 
1620 PO=PA(P) 
1630 PA(P)=VAL(A$) + SC 
1640 COLOR ,PA(P) 
1650 FOR Y=l TO 212 
1660 FOR X=l TO 255 
1670 IF POINT (X,Y) = PO THEN 

PSET(X,Y),PA(P) 
1680 NEXTX 
1690 NEXTY 
1700 RETURN 
1710 ' 

1720 ' ( "H) COLOR PAPEL CON 
CLS. 

1730 ' 

1740 A$=INKEY$:IF A$ = " " 

GOTO 1740 
1750 IF A$<"0" OR A$>"7" 

GOTO 1740 
1760 PA(P)=VAL(A$) + SC 
1770 COLOR, PA(P) 
1780 CLS 
1790 RETURN 
1800 ' 

1810 1 ( "F) RELLENADO DE 
COLOR. 

1820 ' 

1830 PAINT (XN.YN), CO(P), 

CO(P) 
1840 RETURN 
1850 ' 

1860 ' ( "I) GUARDA LA 
REFERENCIA. 

1870 ' — — 

1880 XI=XN:YI = YN 
1890 RETURN 



1900 ' 

1910 ' ( \) LINEA DESDE REF. 

1920 ' 

1930 LINE (XI, Yl) - (XN.YN) 
1940 RETURN 
1950 ' 

1960 ' ( ~Q) RECTANGULO 
DESDE REF. 

1970 ' 

1980 LINE (XI.YI) — (XN.YI) 
1990 LINE (XI, Yl) - (XI, YN) 
2000 LINE (XN.YI) - (XN.YN) 
2010 LINE (XI, YN) - (XN.YN) 
2020 RETURN 
2030 ' 

2040 ' ( "0) CIRCLE CON 

CENTRO EN REF. 

2050 ' - 

2060 D = INT (SQR(((XN-XI) "2) 

+ ((YN-YIT2))) 
2070 CIRCLE (XI,YI),D,,,, 1.3 
2080 RETURN 
2090 1 

2100 ' SERVICIO DEL STOP. 

2110 ' 

2120 STOP ON 
2130 RETURN 
2140 ' 

2150 ' FIN DEL PROGRAMA' 

2160 1 

2170 KEY(l) OFF:KEY(2) OFF 
2180 KEY(3) 0FF:KEY(4) OFF 
2190 KEY(5) OFF 
2200 SCREEN 0 
2210 KEYON 
2220 COLOR 15,4,4 
2230 CLS 
2240 CLEAR 

2250 PRINT "Fin de programa." 
2260 END 



Si so te hace difícil 
encontrar l\Pl T 
ni (u kiosco habitual, 
resérvalo por adelantado, 
o háznoslo saber 
para que podamos remediarlo 
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LOS MEJORES 
DE IñPUT MSX 



PUESTO TITULO PORCENTAJE 

1° Soccer 23,1 % 

2. ° KnightLore 15,8 % 

3. ° Mero 13,9 % 

4. ° Profanation 12,1 % 

5. ° Jack the ñipper 8,4 % 

6. ° Alien-8 6,5 % 

7. ° RiberRaid 5,5 % 

8. ° Camelot Warriors 5,5% 

9. ° Yie Ar Kurig-fu II 4, 6 % 

10.° RoadFighter 4,6 % 



100 % 

Para ía selección de esta relación únicamente se 
han tenido en cuenta las votaciones enviadas 
por nuestros lectores de acuerdo con la sección 
«Los Mejores de lnput». 

Febrero de 1987 




EL GRAN IMPACTO DEL 
MICROPROCESADOR 



Nuestra revista, fiel a su espíritu de ir 
ampliando horizontes para sus lectores, 
incorpora con este número una nueva 
sección. En ella iniciamos la publicación 
de una serie de artículos, que ha sido 
concebida como vehículo para un mejor 
conocimiento de nuestro ordenador 
— especialmente de su parte interior — , 
lo que nos va a permitir sacar el mayor 
partido a la infinidad de posibilidades 
que ofrece el sistema MSX. 

No por sabido está de más recordar 
que la creación de programas y utili- 
dades no es tarea sencilla, pues re- 
quiere unos conocimientos que se ad- 
quieren poco a poco mediante los es- 



tudios correspondientes. Esta circuns- 
tancia no representa que para manejar 
un microordenador sea imprescindible 
saber programar. Cualquier persona 
puede utilizar un ordenador, en la ca- 
lidad de usuario de los programas que 
ofrece el mercado de software, cier- 
tamente muy amplio. Pero para los 
iniciados en el tema, y los que co- 
mienzan a sentir cierta inquietud, les 
es muy conveniente conocer por den- 
tro su microordenador, analizarlo 
como herramienta de trabajo, aumen- 
tar el campo de conocimientos, a la 
par que disfruta comprobando la ob- 
tención de mayor rendimiento. 

Así pues, intentaremos plasmar de 



forma divulgativa, lo más gráfica y 
sencilla posible, estas cuestiones que 
se crean dentro del mundo del mi- 
croordenador. 




16 INPUT 





rl -¡rrO Z'80 


BHHBBSSBE 


EESSSSSE^SSEj 


El ftlicr w 





Lo que sí solicitamos es perseveran- 
cia, a la ayuda que desde estas páginas 
os vamos a brindar para conseguir des- 
cubrir las posibilidades de que dispo- 
néis con vuestro ordenador MSX. 

UN POCO DE HISTORIA 

En esta primera «inmersión» en el 
mundo interior de nuestro ordenador, 
comenzaremos haciendo un poco de 
historia. 



El término microordenador se ha 
venido empleando desde hace algunos 
años para denominar a todo tipo de 
pequeño dispositivo computador. Un 
microordenador no es más que un or- 
denador controlado por uno o más mi- 
croprocesadores . 

El microordenador ha sido el resul- 
tado de una evolución, partiendo de 
las familias de circuitos lógicos TTL 
(transistor transistor logic) y MOS 
(metal oxide semiconductor) de las es- 
calas de integración media y alta 
(MSI/LSI), que son una serie de cir- 
cuitos integrados que juntamente con 
los relés, fueron los protagonistas de 
los automatismos de otras épocas. 

Este resultado evolutivo surgió ante 
la necesidad de simplificar el diseño de 
nuevas aplicaciones. Anteriormente 
era preciso diseñar una concepción 
distinta para cada aplicación concreta, 
que se convertía en un proceso com- 
plejo, caro y lento en algunos casos. 



La llegada del microprocesador no 
hizo que se prescindiera de estos cir- 
cuitos, ya que generalmente son los 
encargados de comunicar la CPU 
(Unidad Central de Proceso) con el 
resto de los circuitos electrónicos del 
sistema. 

En la actualidad se construyen au- 
tomatismos empleando aún estos cir- 
cuitos, bien por ser diseños extrema- 
damente sencillos o cuando se preci- 
san velocidades muy altas y que un mi- 
croprocesador no puede alcanzar, a 
pesar de su mayor coste. 

La aparición del microprocesador 
hizo que se estandarizaran las solucio- 
nes a los problemas de diseño, ofre- 
ciendo una amplia gama de posibili- 
dades y facilitando que con un mismo 
diseño estándar en uP, se pudiera dar 
respuesta a numerosos planteamien- 
tos, evitando de este modo «las solu- 
ciones a medida» que se utilizaban an- 
teriormente. 
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Como toda nueva tecnología, tam- 
bién pasó por fases evolutivas. Así, al 
principio, los microordenadores er.^n 
muy grandes, no eran rápidos y fueron 
utilizados como terminales de orde- 
nadores más potentes. 

Se consideraba una tarea ardua y 
complicada el solo hecho de progra- 
mar un ordenador, y mucho más llegar 
a entenderlo, mitificándolo de tal 
forma, que sólo estaba al alcance de 
un reducido grupo de personas espe- 
cializadas, en un laboratorio en el que 
los técnicos vestían bata blanca. 

Todo esto ha cambiado, desde el 
momento en que cualquier persona 
puede tener un microordenador en 
casa, como es el caso del MSX. 

Factor determinante es que los mi- 
croordenadores domésticos MSX in- 
corporan el lenguaje de alto nivel BA- 
SIC, que permite, sin necesidad de de- 
masiados conocimientos previos, rea- 
lizar funciones básicas, abriendo así 
nuevos horizontes 

Antiguamente, lo que a nosotros 
nos supone una línea de programa, 
significaba muchas horas de estudio 
para aquel señor de la bata blanca, lo 
que demuestra hasta qué nivel se ha 
simplificado la programación. 



Asimismo, los circuitos clásicos han 
quedado relegados a un segundo tér- 
mino, cambiando de función. Antes, 
el relé servía como elemento de con- 
trol, como memoria de estado de un 
automatismo, mientras que ahora los 
datos y estados internos de la má- 
quina, se retienen nn la memoria del 
sistema y los relés on elemertos fron- 
tera. Es decir, f »n los c )nent;s, 
que excitados por el microordenador, 
controlan dispositivos de potencia, 
dado que el microprocesador está li- 
m.tado para trabajar con grandes po- 
tencias por sí solo. 

Los primeros microprocesadores 
que se construyeron fueron de 4 bits, 
pero pronto se vio que la capacidad de 
memoria, datos y juego de instruccio- 
nes que podían manejar eran insufi- 
cientes. 

Del microprocesador de 4 bits se 
pasó al de 8 bits, que permitía manejar 
cómodamente textos, ya que en cada 
posición de memoria se puede alma- 
cenar un carácter alfabético, así como 
manejar cantidades entre 0 y 255 o nú- 
meros con signo entre -128 y 127 en 
un solo acceso a memoria. 

De esta serie de microprocesadores 
de 8 bits, el primero fue el 8(X)8 se- 



guido del 8080, ambos con la carac- 
terística común de precisar de más de 
una tensión de alimentación para fun- 
cionar. Además, necesitan estar 
acompañados de chips controladores 
especiales que hacen posible su fun- 
cionamiento. El 8080 tiene limitada su 
velocidad máxima a IMhz. (1.000.000 
de estados en cada segundo), lo cual 
es poco comparado con los uP actua- 
les. 

Estos microprocesadores fueron su- 
perados por otros como el 8085 que 
funciona solamente con una tensión 
de alimentación y posee el bus multi- 
plexado, funcionando con una fre- 
cuencia de reloj máxima de 6 Mhz. 

EL REVOLUCIONARIO Z80 

Paralelamente al 8085 se creó el 
Z80, que absorbe y amplía las funcio- 
nes del 8080 tanto en hardware como 
en software, pues sólo requiere una 
tensión de alimentación, maneja la 
misma cantidad de memoria, funciona 
a una velocidad de reloj de 4 Mhz. y 
es capaz de controlar memoria diná- 
mica con una mínima electrónica ex- 
terna. 

Una particularidad del Z80 es que, 




Diagrama de bloques de nuestro ordenador 
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dispositivos periféricos 
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como absorbe las funciones del 8080, 
puede sustituirlo en antiguos sistemas 
mejorando sus prestaciones. 

La familia de componentes Z80 sig- 
nificó un importantísimo avance en el 
estado de la tecnología de los microor- 
denadores. Estos componentes son in- 
terconectables con la mayoría de me- 
morias estándar, generando así un am- 
plio abanico de posibilidades de di- 
seño de distintos microordenadores. 



ESTRUCTURA DEL 
MICROPROCESADOR 

Pero un microprocesador no puede 
realizar ninguna función por sí mismo. 
Necesita de una memoria que le pro- 
porcione las instrucciones a ejecutar 
en secuencia, así como dónde guardar 
los datos y resultados temporales de 
los cálculos realizados. Igualmente 
precisa de canales que hagan posible 
la comunicación con el exterior. 



Llegamos así a la concepción de la 
idea de estructura del ordenador, que 
es en definitiva el contexto en el que 
se halla el microprocesador para cons- 
tituir un sistema computador. 

Esta estructura se divide en tres blo- 
ques principales que son: 

— Memoria. 

—CPU. 

— Dispositivos de Entrada/Salida 
(II O). 

La memoria se puede dividir en dos 
partes: ROM y RAM. La memoria 
ROM es inalterable y se retienen en 
ella los programas que hacen posible 
el funcionamiento de la máquina, en 
nuestro caso el intérprete del lenguaje 
BASIC y el sistema operativo básico 
del MSX. 

La memoria RAM, por su parte, es 
donde cargaremos los programas que 
hemos elaborado nosotros mismos, o 
bien los que compremos en el comer- 
cio y también es el dispositivo donde 



se guardarán los datos para realizar 
cálculos y el resultado de los mismos. 
Parte de la RAM retiene una copia de 
la información mostrada por la pan- 
talla del ordenador, ésta es la llamada 
VRAM. Debemos tener muy en 
cuenta que toda la información depo- 
sitada en la memoria RAM se destruye 
al desconectar el ordenador. 

El segundo bloque incluye la CPU, 
que es la encargada de ejecutar las ins- 
trucciones que componen los progra- 
mas, y en definitiva es el componente 
que da marcha a nuestro ordenador. 
Contrariamente a lo que se pueda 
creer en un principio, la CPU no se 
detiene nunca mientras el ordenador 
esté en funcionamiento, ya que 
cuando no se ejecuta ningún programa 
del usuario, el control de la CPU es 
tomado por los programas que com- 
ponen el sistema operativo del orde- 
nador. 

Finalmente tenemos los dispositivos 




de Entrada/Salida (InputlOutput), que 
tienen por misión comunicar la CPU 
con el mundo exterior. En nuestro 
equipo MSX, disponemos de ciertos 
circuitos especializados en determina- 
das funciones de entrada/salida. Por 
ejemplo está el PSG (programable 
sound generator A Y38910) que es el 
encargado de generar todos los efectos 
de sonido. Otro ejemplo de chip es- 
pecializado en entrada/salida, es el 
VDP (video display procesor), que es 
el encargado de generar las señales de 
video para el monitor del sistema. Co- 
nectados a estos circuitos que genéri- 
camente reciben el nombre de contro- 
ladores, se encuentran los dispositivos 
periféricos. Pantallas, teclados, discos 
flexibles y rígidos, cassettes e impre- 
soras, son elementos periféricos que 
se comunican con la memoria. 

Las tres partes son imprescindibles 
para cualquier proceso y son las que 
definirán las prestaciones de nuestro 
equipo. 



También hemos podido observar 
que para que un ordenador, indepen- 
dientemente de su complejidad, po- 
tencia, velocidad o prestaciones, rea- 
lice alguna función, es imprescindible 
que disponga de un programa que le 
indique en cada momento lo que debe 
hacer. 

Estos programas son introducidos por 
el usuario empleando un lenguaje de 
programación adecuado, (BASIC, 
PASCAL, FORTRAN, ASSEM- 
BLER u otros), en la memoria de la 
máquina. 

La CPU siempre ejecuta los progra- 
mas en «Lenguaje Máquina». Si el 
programador entra el programa en 
otro lenguaje, pasa por un traductor 
interno que lo transforma en código 
máquina. 

De ahí que el programa que ejecu- 
tará más rápidamente el microproce- 
sador será el que se le proporcione di- 
rectamente en su lenguaje, debido a 
que ya no deberá pasar por el pro- 



grama intérprete (traductor) siendo 
procesado por la CPU de inmediato. 

Generalmente, a nivel doméstico se 
emplea el lenguaje BASIC ya que está 
incorporado en el propio ordenador y 
aporta la nada desdeñable ventaja de 
una fácil comprensión. 

En próximos números seguiremos 
familiarizándonos con el microorde- 
nador, en lo que a su estructura in- 
terna se refiere. Abordaremos la ar- 
quitectura de la CPU, los modos de di- 
reccionamiento empleados por el UP 
para acceder a la memoria y periféri- 
cos del sistema, así como las técnicas 
que utiliza para comunicarse con el 
mundo exterior. 

Asimismo, es nuestra intención des- 
cribir el funcionamiento de las instruc- 
ciones del Lenguaje Máquina del mi- 
croprocesador dado que los algoritmos 
codificados en este lenguaje resultan 
mucho más compactos y rápidos, pese 
a la complejidad en la confección de 
los mismos. 
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1 








IProgramacio^ 









EL 

PALABRERO 



El programa «PALABRERO» es 
una versión del conocido 
«M ASTER MIND» pero trabajando 
con palabras en lugar de con 
fichas de colores. 

Permite jugar a un jugador 
contra la máquina, o bien, a dos 
jugadores entre sí. 

El juego consiste en adivinar la 
palabra de cinco letras propuesta 
por el otro jugador, o en su caso, 
por la máquina, presentando a 
cada intento del jugador, el 
número de caracteres que 
contiene de la palabra buscada, 
independientemente de su 
posición. 

El juego está limitado en 
número de intentos y en tiempo, 
es decir, inicialmente está 
limitado a cuarenta intentos en la 
modalidad de un jugador, y de un 
tiempo de 45 segundos por 
intento. 

Si el jugador desea rendirse, 
puede pulsar la tecla "Fl" y 
entonces el ordenador le mostrará 
la palabra que retenía en su 
interior. 

Este juego puede ser 
considerado didáctico, dado que 
requiere pensar palabras lógicas 
que contengan algunas letras de 
combinaciones anteriores para 
llegar a la solución. 

En la modalidad de un jugador, 
el programa tiene en su interior 
cien palabras para adivinar, 
número suficientemente elevado 
como para garantizar que la 
palabra escogida por la máquina, 
nos va a dar que pensar... 

Advertencia 

Cuando se haga correr el 



programa, las palabras deberán 
ser introducidas en letras 
mayúsculas, dado que tal como 
está diseñado, no interpreta los 
caracteres en minúsculas. 

Partes del programa 

Para los interesados en analizar 
la composición del programa, 
enumeramos a continuación los 
bloques componentes del mismo: 



100- 


240 


presentación 


250- 


260 


programación de Fl 


280- 




inicialización de 






variables A y B 


290- 


330 


inicia el sprite X$ 






(movimiento) 


340- 


360 


movimiento de 






sprite, salida a 470 


370- 




música inicial 


390- 




bucle de espera 


440- 




apaga el sprite 


460- 




repite desde 290 


470- 




abre pantalla gráfica 






para texto 


480- 


540 


estrellas 


550- 


620 


dibuja el trapecio y 






lo rellena 


630-1390 


continúa la 






presentación puntos 






y circ 


1400-1470 


fin de la 






presentación 


1480-1630 


juego (inicio núm. 






jug) 


1640- 




juego si dos 






jugadores 


2730- 




juego si un jugador 



3670-3710 palabras internas 
3720-3760 escribe la solución 
3770-3810 advertencia de 

limitaciones 
3820-3890 emite un sonido 

COMENTARIOS 

El juego resulta divertido, ya 
que el conjunto interno de 
palabras es muy amplio. 

Los límites tanto en tiempo para 
dar la respuesta como en número 
de intentos, son correctos y 
aumentan la emoción del juego. 

Respecto a la presentación del 
juego, debemos decir que es muy 
bonita y "galáctica", pero nuestro 
consejo en este caso es el meditar 
un poco sobre la longitud y 
eficiencia de los programas. 

Un programa no es mejor por 
ocupar más espacio sino todo lo 
contrario; si en dos programas que 
poseen las mismas prestaciones, 
uno de ellos es más reducido, 
tendrá las siguientes ventajas: 

— Al transcribirlo de la revista al 
ordenador, tendremos menos 
posibilidades de cometer 
errores. 

— El tiempo empleado en este 
trabajo será menor. 

— Ocuparemos menos memoria 
de la máquina. 

Debido a esto, aconsejamos 
estructurar un poco los programas, 
con lo que aumentará la eficiencia 



Si se te hace difícil encontrar IMM I 
en tu kiosco habitual, 
resérvalo por adelantado, o háznoslo saber 
para que podamos remediarlo 
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Programo**" 



de tus horas como programador. 

La ¡dea es buena, y el programa 
funciona. 

100 ' =============== 

110 ' 

120 ' MASTER MIND - 
PALABRERO 

130 ' 

140 '=============== 

150 ' 

160 ' ********************** 
170 ' * Programado por: 
180 ' * 

190 ' * LUIS GARCIA 
RODRIGUEZ 

200 ' * 

210 ' * (SALAMANCA. JUNIO DE 
1986) 

220 ' ********************** 
230 ' 
240 ' 

250 ON KEY GOSUB 3720 
260 KEY (1) ON 
270 COLOR 8.1,1:SCREEN 2,2 
280 A=1:B = 8 
290 FOR l%= 1T032 
300 READC% 
310 X$ = X$ + CHR$(C%) 
320 NEXT 1% 
330 SPRITE$ (1) = X$ 
340 D = D + 8 : E = 160 
350 IF D>230 THEN 470 
360 PUTSPRITE1,(D,E),A, 
1:BEEP 

370 PLAY"L2ADEFFDEAADEFF 

EDAGGG" 
380 SWAP A, B 
390 FOR J = 1TO 10:NEXTJ 
400 DATA 0,111, 111, 108, 

108, 108, 109, 109 
410 DATA 108, 108, 111, 111, 

96, 127, 127, 0 
420 DATA 0,188, 190, 54, 54, 

62, 188, 184 
430 DATA 188, 182, 182, 182, 

0, 254, 254, 0 
440 SPRITE OFF 
450 RESTORE: X$ = "" 
460 GOTO 290 
470 OPEN "GRP: "AS #1 
480 X = 1 



490 H = RND(-TIME) 
500 FOR W = 1 TO 260 
510 X = X+1 : IF X>15 THEN X 
= 2 

520 K = INT (RND (1) * 192) 

530 PSET (W, K), X 

540 NEXT 

550 COLOR 4 

560 PSET (8,136) 

570 LINE -(56,88) 

580 PSET (248,136) 

590 LINE -(200,88):LINE - 

(56,88) 
600 PSET (8,136) 
610 LINE -(248,136) 
620 PAINT(58,90) 
630 LINE (8,136) - (248,144), 

10, B 

640 PAINT (10,138), 10 

650 COLOR 13 

660 PSET (48,120) 

670 LINE -(64,48) 

680 PSET (64,48) 

690 LINE -(76,48) : LINE - 
(80,60) : LINE - (84,48) : 
LINE - (96,48) : LINE - 
(112,120) : LINE - (96, 
120) : LINE - (92,100) : 
LINE - (88,120) 

700 PSET (48,120) 

710 LINE -(64,120) : LINE - 
(68,100) : LINE - (72,120) 
: LINE - (88,120) 

720 PAINT (90,50) 

730 PSET (212,120) 

740 LINE -(196,120) 

750 PSET (204,84) 

760 LINE -(212,120) 

770 PSET (204,84) 

780 LINE -(212,48) : LINE - 
(196,48) : LINE - (192,68) 
: LINE - (188,48) : LINE - 
(172,48) : LINE - (180,84) 
: LINE - (172,120) : LINE - 
(188,120) : LINE- (192, 
100) : LINE - (196,120) 

790 PSET (168,64) 

800 LINE -(168,48) 

810 PSET (116,104) 

820 LINE -(116,120) 

830 LINE -(164,120) 

840 PSET (116,104) 



850 LINE -(148,104) 
860 PSET (168,48) 
870 LINE -(120,48) 
880 PSET (168,64) 
890 LINE -(136,64) 
900 CIRCLE (152,96), 8,, 

4.24873, . 
46364760900081* 
910 CIRCLE (132,72), 8,, 

1.1071487177941 #, 
3.605237* 
920 CIRCLE (136,72), 28,, 

2.158797*, 3.926988* 
930 CIRCLE (148,100), 25,, 

5.387125*. 
1.2490457723982* 
940 PSET (156,76) 
950 LINE -(124,76) 
960 LINE -(124,72) 
970 PSET (116,92) 
980 LINE -(160,92) 
990 LINE -(160,96) 
1000 PSET (116,91) 
1010 PSET (149,104) 
1020 PSET (135,64) 
1030 PAINT (136,49) 
1040 PAINT (177,49) 
1050 PSET (140,0) 
1060 LINE -(64,48) 
1070 PSET (76,48) 
1080 LINE -(140,0) 
1090 LINE -(84,48) 
1100 PSET (96,48) 
1110 LINE -(140,0) 
1120 LINE -(112,56) 
1130 PSET (168,48) 
1140 LINE -(140,0) 
1150 LINE -(172,48) 
1160 PSET (188,48) 
1170 LINE -(140,0) 
1180 LINE -(196,48) 
1190 PSET (212,48) 
1200 LINE -(140,0) 
1210 PSET (172,92) 
1220 LINE -(164,64) 
1230 PSET (116,104) 
1240 LINE -(120,92) 
1250 PSET (112,120) 
1260 LINE -(116,104) 
1270 PSET (64,121) 
1280 LINE -(70,113) 
1290 PSET (89,120) 



24 INPUT 



1300 UNE -(94,113) 
1310 PSET (171,120) 
1320 LINE -(169,114) 
1330 PSET (195,120) 
1340 LINE -(190,112) 
1350 PSET (179,84) 
1360 LINE -(168,65) 
1370 COLOR 15 

1380 LINE(169,155)-(90,177),, 
B 

1390 LINE (86,181)-(173, 

151), ,B 
1400 A=1:B=15 
1410 FOR X = 

0 TO 600 STEP 10 
1420 SWAP A.B 

1430 COLOR A 

1440 PRESET (96, 163):PRINT 

#1, "PALABRERO" 
1450 NEXT X 
1460 CLOSE#l 
1470 PU=40 

1480 SCREEN2:COLOR 15,4,4: 
CLS:KEY OFF:OPEN"GRP: 
"AS#1 

1490 ON KEY GOSUB 3720: 

KEY(l)ON 
1500 D = 0:Y = 4:F = 22:L=2:K = 

2 

1510 LINE(183,40)-(70,16), 
15, BF 

1520 LINE(185,42)-(68,14), 
15, B 

1530 COLOR1:PRESET(80,25): 

PRINT#1,"EL 

PALABRERO" 
1540 LINE(8,64)-(248,100),1, 

BF 

1550 COLOR15:PRESET(24,80): 
PRINT#l,"Por: LUIS 
GARCIA RODRIGUEZ" 

1560 COLOR 10:PRESET(0, 

150): PRINT* 1 , 

1570 COLOR 1:PRESET(27, 
165):PRINT#1, 
"CUANTOS JUGADORES: 

1 - 2?" 

1580 COLOR 10:PRESET(0, 

180):PRINT#1," 



1590 CLOSE#l 



1600 K$=INKEY$ 
1610 IFK$ = "1"THEN 2730 
1620 IFK$="2"THEN 1640 
1630 IFK$o"2"THEN 1600 
1640 SCREEN0:CLS:LOCATE12, 
0:PRINT"INSTRUCCIONE 
Sj LOCATE 1 2,1:PRINT"~ 

1650 PRINTTAB(5) "En esta 
opción se trata de 
introducir, cuando el 
ordenador lo pida, una 
palabra cada jugador" 

1660 PRINTTAB(5) "A 

continuación aparecerán en 
pantalla los nombres de los 
contendientes, un contador 
de tiempo entre ambos y 
unas flechas junto al 
nombre del jugador al que 
se trata de adivinar la 
palabra." 

1670 PRINTTAB(5) "Las palabras 
se van introduciendo antes 
de que el contador llegue a 
45 segundos, de lo 
contrario el turno pasará al 
siguiente jugador." 

1680 PRINTTAB(5) "Como es 
lógico, ya que se trata de 
descubrir la palabra del 
contrario debemos 
escribirlas debajo del 
nombre de éste." 

1690 LOCATE0,22:PRINT 

"PULSA UNA TECLA...." 

1700 A$ = INKEY$:IFA$= " 
"THEN1700 

1710 CLS:PRINTTAB(5) "Al lado 
de cada palabra ingresada 
el ordenador dirá cuántas 
letras de ésta, están 
contenidas en la del 
adversario." 

1720 LOCATE0.22: 

PRINT"PULSA UNA 
TECLA..." 

1730 A$ = INKEY$:IFA$ = " 
"THEN1730 

1740 GOSUB 3770 

1750 CLS:Z$ = "NOMBRE DEL 
JUGADOR NUM. 1" 



1760 PRINTZ$;:INPUT M$ 
1770 CLS:PRINT"NOMBRE DEL 

JUGADOR NUM. 2"; 
1780 INPUT N$ 
1790 CLS:LOCATE 0, 

22:PRINT"CUANDO ESTE 

PULSA << RETURN » " 
1800 LOCATE0,0:PRINTM$ 

"ESCRIBE TU PALABRA Y 

PROCURA":PRINT"QUE 
ÑOLA VEA";N$:PRINT: 

PRINT;:INPUT Y$ 
1810 GOSUB 2610 
1820 CLS:LOCATE 0,22:PRINT 

"CUANDO ESTE PULSA« 

RETURN »" 
1830 LOCATE0,0:PRINTN$" 

ESCRIBETUPALABRAY 

PROCURA":PRINT"QUENO 

LAVEA";M$:PRINT:PRINT; 

:INPUT W$ 
1840 GOSUB 2670 
1850 CLS:FOR L = 4T023: 

LOCATE17,L:PRINT"V": 

NEXTL 

1860 COLOR 2,1:LOCATEY+1,0 

:PRINTM$ 
1870 LOCATE Y,1:PRINT" 



1880 LOCATE 22,0:PRINTN$ 
1890 LOCATE21,l:PRINT" 



1900 GOTO 1920 

1910 LOCATEY + 7, K:PRINT"-"; 

A:LOCATE 0,0:PRINT" 

": LOCATE 35,0: 

PRINT"<<":GOTO 2150 
1920 SOUND 0,0:GOSUB 2610 

:LOCATE0,0:PRINT">>": 

LOCATE35,0:PRINT" " 
1930 TIME = 0 
1940 MIN% = TIME/2500 
1950 SEG% = TIME/50- 

MIN%*50 
1960 LOCATE 16, 

1:PRINTSEG% 
1970 IF SEG%<35 THEN 

GOSUB 3820 
1980 IF SEG% = 45THEN 2150 
1990 K$ = INKEY$:IFK$ = " 

"THEN 1940 
2000 SOUND 0,0 
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2010 X = 0:A=0:K = K+1:IF 

K = >22 THEN K=3 
2020 LOCATEY + 2, 

K:PRINT" ": 

LOCATE Y+2,K:PRINTK$ ; 

:LINE INPUT R$:LOCATE 

15,K:PRINT" V": 

R$ = LEFT$(R$,4): 

X$=K$+R$ 
2030 C = C+ MOCATE 0,1: 

PRINT C 
2040 IF X$ = Y$ THEN 2370 
2050 X=X+1 

2060 IF X>5 THEN 1910 

2070 R$ = MID$(X$,X,1) 

2080 IFR$ = A$THEN A$ = "":A 

= A+l:GOTO 2050 
2090 IFR$= B$THEN B$ = "":A 

= A+l:GOTO 2050 
2100 IFR$ = C$THEN C$ = "":A 

= A+l:GOTO 2050 
2110 IFR$ = D$THEN D$ = "":A 

= A+l:GOTO 2050 
2120 IFR$ = E$THEN E$ = "":A 

= A+l:GOTO 2050 
2130 GOTO 2050 
2140 LOCATE F + 7,LPRINT" 

-";B: LOCATE 35,0: 
PRINT" *':LOCATE0, 
0:PRINT">>":GOTO1920 
2150 SOUND 0,0:GOSUB 2670 

:LOCATE0,0:PRINT" ": 

LOCATE35,0:PRINT"«" 
2160 TIME=0 
2170 MIN%=TIME/2500 
2180 SEG%=TIME/50- 

MIN%*50 
2190 LOCATE 16,1: 

PRINTSEG% 
2200 IF SEG%>35 THEN 

GOSUB 3820 
2210 IF SEG%=45THEN 1920 
2220 K$ = INKEY$:IFK$ = " 

"THEN 2170 
2230 SOUND 0,0 
2240 X = 0:B = 0:L = L+1:IF L= 

>22 THEN L=3 
2250 LOCATE F+2, 

L: PRINT" ": LOCATE 

F+2,L:PRINTK$;:LINE 

INPUT B$:T$ = K$ + B$ 
2260 IF T$=W$ THEN N$ = 



M$:GOTO 2370 
2270 D = D+l:LOCATE 32,1: 

PRINT D 
2280 X = X+1 
2290 IF X>5 THEN 2140 
2300 R$ = MID$(T$,X,1) 
2310 IFR$ = F$THENF$ = "":B = 

B+l:GOTO 2280 
2320 IFR$ = G$THENG$ = "":B = 

B+l:GOTO 2280 
2330 IFR$ = H$THENH$ = "":B = 

B+l:GOTO 2280 
2340 IFR$ = I$THENI$ = "":B = B 

+ l:GOTO 2280 
2350 IFR$ = J$THENJ$ = "":B = B 

+ l:GOTO 2280 
2360 GOTO 2280 
2370 CLS:P$ = "ESA ES LA 

PALABRA":0$ = 

"ENHORABUENA":l$ = 

"OTRA PARTIDA? (S/N)" 
2380 COLOR 13:D = D+1:L = L 

+ 3:T = 4:PRINT:PRINT 

2385 LOCATE T,L:PRINT 

SPACE$(38) 
2390 FOR W=l TO LEN(P$) 
2400 LOCATEF+10,1:PRINTD 
2410 LOCATE T,L:PRINT 

MID$(P$,1,W); 
2420 R = TIME 
2430 IF TIME<R + 5 THEN 

2430 
2440 NEXT W 
2450 L = L + 3:PRINT:PRINT 
2455 LOCATE T,L:PRINT 

SPACE$(38) 
2460 FOR W=l TO LEN(0$) 
2470 LOCATEF+10,1:PRINT D 
2480 LOCATET + 5, L: PR I NT 

MID$(0$,1,W); 
2490 R=TIME 
2500 IF TIME<R + 5 THEN 

2500 
2510 NEXT W 

2520 LOCATE T+18,L:PRINTN$ 
2530 L=L+3:PRINT:PRINT 
2535 LOCATE T,L:PRINT 

SPACE$(38) 
2540 FOR W=l TO LEN(i$) 
2550 LOCATEF+10,1:PRINT D 
2560 LOCATET+10,L:PRINT 

MID$(I$,1,W); 



2570 R=TIME 

2580 IF TIME>R + 5 THEN 

2580 
2590 NEXT W 
2600 GOTO 3480 
2610 A$ = MID$(Y$,1,1) 
2620 B$ = MID$(Y$,2,1) 
2630 C$ = MID$(Y$,3,1) 
2640 D$ = MID$(Y$,4,1) 
2650 E$ = MID$(Y$,5,1) 
2660 RETURN 
2670 F$ = MID$(W$,1,1) 
2680 G$ = MID$(W$,2,1) 
2690 H$ = MID$(W$,3,1) 
2700 l$ = MID$(W$,4,l) 
2710 J$=MID$(W$,5,1) 
2720 RETURN 
2730 ' 

2740 'SOLO UN JUGADOR 
2750 ' 

2760 SCREEN0:CLS:K$ = " 
":LOCATE12,0:PRINT" 
INSTRUCCIONES 
":LOCATE12,l:PRINT""~" 

2770 PRINTTAB(5) "El 

ordenador va a elegir una 
palabra que debes 
descubrir por deducción, 
ingresando sucesivamente 
palabras de 5 letras.» 

2780 PRINT 

2790 PRINTTAB(5) "Tras de ello 

el ordenador te irá diciendo 

el núm. de letras 

contenidas en la palabra a 

descubrir." 
2800 PRINT 

2810 PRINTTAB(5) "Para ello 
dispones de 40 
oportunidades y de 45 
segundos para cada una de 
ellas. Si sobrepasas alguna 
de las dos el ordenador te 
dirá cuál era la palabra." 

2820 PRINT 

2830 PRINTTAB(5) "Si en 

cualquier momento de la 
partida te das por vencido 
sabrás la palabra pulsando 
<< Fl » ." 

2840 LOCATE0, 
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22:PRINT"PULSA UNA 

TECLA..." 
2850 A$ = INKEY$:IFA$ = " 

"THEN 2850 
2860 GOSUB 3770 
2870 CLS:Y=4 
2880 Z$ = "CUAL ES TU 

NOMBRE" 
2890 PRINTZ$,:INPUT M$ 
2900 CLSrPRINT M$" ESPERA 

UN MOMENTO POR 

FAVOR" 

2910 FOR S=l TO 1500:NEXT S 
2920 GOSUB 3580 
2930 CLS:COLOR 2, 

l:LOCATEY+l, 

0:PRINTM$ 
2940 LOCATEY, LPRINT" 



2950 K = 2 
2960 GOTO 3000 
2970 K = K + 1:PU = PU- 
1: LOCATE Y+7, 

K:PRINT"-"; A 

2980 C = C+1:LOCATE0, 

1:PRINTC 
2990 IF C = 40 THEN 3720 
3000 TIME=0 



3010 MIN% = TIME/2500 
3020 SEG% = TIME/50- 

MIN%*50 
3030 LOCATE 33,0:PRINTSEG% 
3040 IF SEG%>35 THEN 

GOSUB 3820 
3050 IF SEG%=45 THEN3720 
3060 K$ = INKEY$:IF K$ = " 

"THEN 3010 
3070 SOUND 0,0 
3080 GOSUB 3520 
3090 X = 0:A=0 
3100 IF K = 20 THEN 3110 

ELSE 3130 
3110 K = 0:FOR L = 0TO22: 

LOCATE19,L:PRINT 

"V":NEXTL 
3120 Y=22 
3130 LOCATEY + 2, 

K+1:PRINT" 

":LOCATEY + 2,K + l: 

PRINTK$;:LINE INPUT 

LI$:X$ = K$ + LI$ 
3140 IF X$ = Q$ THEN 3240 
3150 X=X+1 

3160 IF X>5 THEN GOSUB 

3520:GOTO 2970 
3170 R$ = MID$(X$,X,1) 



3180 IFR$ = A$THEN A$=" 

":A=A-|-l:GOTO 3150 
3190 IFR$ = B$THEN B$ = " 

":A=A+l:GOTO 3150 
3200 IFR$=C$THEN C$=" 

":A=A+l:GOTO 3150 
3210 IFR$ = D$THEN D$ = " 

":A=A+l:GOTO 3150 
3220 IFR$ = E$THEN E$ = " 

":A=A+l:GOTO 3150 
3230 GOTO 3150 
3240 CLS:Y=4:P$="ESA ES LA 

PALABRA":0$ = 

"ENHORABUENA": l$ = 

"OTRA PARTIDA? (S/N)" 
3250 COLOR 13:C = C+1:K = 

K+3:T=4:PRINT:PRINT 
3255 LOCATE T,K:PRINT 

SPACE$(38) 
3260 FOR W=l TO LEN(P$) 
3270 LOCATEY-3,l:PRINTC 
3280 LOCATEY, K:PRI NT 

MID$(P$,1,W); 

3290 R=TIME 

3300 IF TIME<R + 5 THEN 3300 
3310 NEXT W 

3320 K = K + 3:PRINT:PRINT: 
PRINT" 

INPUT 27 



3325 LOCATE T,K:PRINT 3580 

SPACE$(38) 3590 
3330 FOR W=l TO LEN(0$) 3600 
3340 LOCATEY-3,l:PRINTC 3610 
3350 LOCATEY+5,K:PRINT 3620 

MID$(0$,1,W)¡ 3630 
3360 R=TIME 3640 
3370 IF TIME<R + 5 THEN 3650 

3370 3660 
3380 NEXT W 3670 
3390 LOCATE Y+18, 

K.PRINTM$ 
3400 K = K+3:PRINT: 

PRINT" 
3405 LOCATE T,K:PRINT 

SPACE$(38) 
3410 FOR W=l TO LEN(I$) 3680 
3420 LOCATEY-3,l:PRINTC 
3430 LOCATEY+10,K:PRINT 

MID$(I$,1,W); 

3440 R=TIME 

3450 IF TIME<R + 5 THEN 3450 
3460 NEXT W 

3465 PRINT:PRINT 3690 
3470 LOCATE25,K + 3:PRINT 

"PUNTOS-";PU 
3480 J$ = INKEY$:IF J$=" 

"THEN 3480 
3490 IF J$ = "S"OR J$ = "s"THEN 

RUN 1470 
3500 IFJ$ = "N"OR 3700 

J$ = "n"THEN NEW 
3510 IFJ$o"S"ORJ$< 

>"N"ORJ$o"s"ORJ$< 

>"n"THEN 3480 
3520 A$=MID$(Q$,1,1) 
3530 B$ = MID$(Q$,2 ) 1) 
3540 C$ = MID$(Q$,3,1) 3710 
3550 D$ = MID$(Q$,4,1) 
3560 E$ = MID$(Q$,5,1) 
3570 RETURN 



DIM DA$(100) 
RESTORE 3670 
FOR J=l TO 100 
READ DA$(J) 
NEXT J 

R = RND(-TIME) 

R = INT(RND(1)*100)+1 

Q$ = DA$(R) 

RETURN 

DATA OZONO, SANTA, 
GRIFO, MUECA, TRONO, 
MARCA, FRESA, METRO, 
AZADA, GAFAS, ARBOL, 
AZOTE, TRAMA.CENIA, 
TRAPO, MUCHO, MUARE, 
RESMA, TRACA.ZUECO 
DATA AGRAZ, BASTO, 
BINGO, RELOJ, MALLA, 
TRIGO, MUSGO, PAPEL, 
MIRLO, TINTA.LUNAR, 
MARTE, TROVA.CHEPA, 
PLUMA,LAPIZ,CORTA, 
LARGA, MECHA, PERLA 
DATA VELLO, POEMA, 
OREJA, BOTON, GRUTA, 
VERDE.HUSMO, HURON, 
RISCO, PRADO, MULEO, 
GENTE, MUJER, TABLA, 
PARIA, PEANA.ZORRA, 
YESCA.VICIO.UJIER 
DATA UÑETA, TRIPA, 
RASPA.SENIL.LUCIO, 
ARANA, GARZA, OROYA, 
PECIO.ICONO, CURVA, 
CUSCA.IDOLO, FIRMA, 
TOSCO, MUGRE, DISCO, 
SARAO, ESCOA.GAMBA 
DATA FATUO, INOPE, 
LACHA, NEUM A, INANE, 
JERGA, OLIVO, HACHA, 
NIVEO, REGIO, POLEO, 



3720 



3730 



3740 

3750 
3760 
3770 



3780 



3790 

3800 

3810 
3820 
3830 
3840 
3850 

3860 
3870 

3880 

3890 



PISTA, OMASO, MOCHA, 
OCELO, ORGIA.GORRO, 
CAUCA.LINEAJSTMO 
SOUND0,0:LOCATE 8.K + 
2:PRINT"LA PALABRA 
ERA ";Q$:LOCATE23,K + 3 
:PRINT"ÁÁÁÁÁÁÁÁÁÁ" 
LOCATE 1,K + 5:PRINT 
"PARA OTRA PARTIDA 
PULSA UNA TECLA" 
R$=INKEY$:IFR$=" 
"THEN 3740 
RUN 1480 
RETURN 

CLS:LOCATE0,0:PRINT 
"ADVERTENCIA":LOCATE0, 
1:PRINT"£££££££££" 
LOCATE0,12:PRINT"NO 
VALEN":LOCATE10, 
10:PRINT"NOMBRES 
PROPIOS":LOCATE10,12: 
PRINT'TLURALES": 
LOCATE10,14: 
PRINT"VERBOS" O 
TIEMPOS VERBALES" 
LOCATE0,22:PRINT 
"PULSA UNA TECLA..." 
A$ = INKEY$:IFA$ = " 
"THEN 3800 
RETURN 
N%=240 

SOUND7.&B00111110 
SOUND8.14 
SOUND0.170: 
SOUND1.0 

FOR J=l TO N%:NEXT 

SOUND0.150: 

SOUND1.0 

FOR J=l TO 

N%:NEXT 

RETURN 
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J. 







TITULO: 
NOMBRE Y APELLIDOS: 
DIRECCION: 

POBLACION: PROVINCIA: 
FORMA DE PAGO: POR TALON BANCARIO □ CONTRA REEMBOLSO □ 



NEMESIS 

cartucho MSX - 5.200 ptas. 

KNIGHTMARE 

cartucho MSX - 5.200 ptas. 

GOONIES 

cartucho MSX - 5.200 ptas. 

GREEN BERET 

cartucho MSX - 5.200 ptas. 

SISTEMA: 



JAIL BREAK 

cassette Amstrad - 2.200 ptai 

disco Amstrad - 3.900 pta< 

cassette Commodore - 2.200 pta< 

cassette Spectrum - 2.000 pta< 

cartucho MSX - 5.200 ptas 

SAMANTHA FO] 



cassette MSX 
cassette Spectrum 
cassette Amstrad 



COD. POSTAL: 



- 1. 995 ptas. 

- 1. 995 ptas. 

- 1. 995 ptas. 



4 




En INPUT estamos convencidos de que aún 
puedes hacer muchas más cosas con tu 
ordenador. Sin duda, muchos lectores estaréis 
utilizando vuestro micro para funciones de lo más 
variadas, en unos casos; pintorescas, en otros; 
mientras que algunos listillos habrán podido 
utilizarlo para resolver tareas complejas. Es lógico, 
modificando programas y variando los periféricos 
nuestro ordenador puede prestar sus servicios en 

infinidad de facetas. INPUT quiere que esas 
aplicaciones y utilidades a las que has conseguido 

dedicar tu ordenador, sean conocidas por todos 
sus lectores y por eso ha organizado el «Concurso 
de Aplicaciones y Utilidades», en el que puede 
participar cualquiera de nuestros lectores. 





BASES 




UTILIDADES Y APLICACIONES: Si tu orde- 
nador controla la calefacción de tu casa, gobierna 
un robot, dirige un pequeño negocio, organiza la 
maqueta de tu tren eléctrico, o cualquier cosa in- 
teresante u original; envíanos información gráfica y 
listados de tus programas, grabados en un cassette, 
diskette o microdrive. 

Todo ello habrá de venir acompañado por un 
texto que aclare cuál es su objetivo, el modo de fun- 
cionamiento y una explicación del cometido que 
cumplen las distintas rutinas que lo componen. El 
texto se presentará en papel de tamaño folio y me- 
canografiado a dos espacios. No importa que la re- 
dacción no sea muy clara y cuidada; nuestro equipo 
de expertos se encargará de proporcionarle la forma 
más atractiva posible. 

UN JURADO propio decidirá en cada momento 
qué colaboraciones reúnen los requisitos adecuados 
para su publicación, y evaluará la cuantía del pre- 
mio en metálico al que se hagan acreedoras. 

No olvidéis indicar claramente para qué ordena- 
dor está preparado el material, así como vuestro 



nombre y dirección y, cuando sea posible, un telé- 
fono de contacto. Entre todos los trabajos recibidos 
durante los próximos tres meses SORTEARE- 
MOS: 

• Un premio de 50.000 ptas. 

• Un premio de 25.000 ptas. 

• Un premio de 10.000 ptas. 

en material microinformático a elegir por 
los afortunados. 

¡No os desaniméis!, por muy simples o complejas 
que puedan parecer vuestras ideas, todas están re- 
visadas con el máximo interés. 

INPUT MSX 

Aribau, 185. Planta 1. a 
08021 BARCELONA 



NOTA: INPUT no se responsabiliza de la devolución del ma- 
terial que no vaya acompañado por un sobre adecuado con el 
franqueo correspondiente. 
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LA PROGRAMACION PARA 
JOYSTICKS 



COMO LEER LOS JOYSTICKS 



DESDE EL BASIC 



HAZ TUS JUEGOS MAS 



Los joysticks son la clave para tener 
unos juegos más profesionales. Pero el 
hacer que tus juegos resulten más diver- 
tidos no significa que tengas que apren- 
der código máquina; puedes empezar 
con el BASIC. 

Una diferencia evidente entre los 
juegos comerciales y los producidos en 
casa es con frecuencia la existencia de 
una opción para joystick. Sin em- 
bargo, no tienes que sumergirte en las 
profundidades intrincadas del código 
máquina para utilizar los joysticks en 
tus propios programas. 

En esta sección del coleccionable, 
veremos la manera de utilizar los joys- 
ticks con programas escritos en BA- 




SIC, haciendo que tus programas de 
juegos resulten más profesionales y 
más divertidos de jugar. 

En el próximo capítulo utilizaremos 
la rutina de joystick en un juego, por 
lo que no debes de olvidarte de al- 
macenar el programa. 

Lo primero que necesitas es un joys- 
tick adecuado. Todo programa está es- 
crito para adaptarse a las característi- 
cas de los joysticks indicadas. 




Existe una gran variedad de joys- 
ticks disponibles, pero todos están es- 
tandarizados para trabajar con vues- 
tros ordenadores MSX. 



UN PUNTO DE MIRA 

Teclea la siguiente sección de pro- 
grama y tendrás un punto de mira con- 
trolable con tu joystick: 

10 CLS:KEY0FF:C0L0R5,1, 

1:SCREEN0,0,0 
120 A=120:B=100 
130 A4$=CHR$(&H0) 
140 A5$=CHR$(&H10) 
150 A6$=CHR$(&H38) 
160 A7$=CHR$(&H10) 
170 A8$ = CHR$(&H0) 
250 A$=A4$+A5$+A6$+A7$ 

+A8$ 
280 SCREEN 2,3,0 
290 SPRITE$(0)=A$ 
470 LINE (0,0)-(256,45),7,BF 
480 CIRCLE (150, 40), 20,11,,, 

1.4 

490 PAINT.(150,40),11 
500 LINE (0,45)-(256,191),5,BF 
510 S = STICK(0) 
520 IF S=l THEN B=B-10 
530 IF S=2 THEN 

A=A+15:B = B-10 
540 IF S = 3 THEN A=A+15 
550 IF S=4 THEN 

A=A+15.:B = B + 10 
560 IF S = 5 THEN B = B+10 
570 IF S = 6 THEN A=A- 

15:B = B + 10 
580 IF S = 7 THEN A=A-15 
590 IF S=8 THEN A=A-15:B = B- 

10 

600 IF A=>250 THEN A = 250 
610 IF A=<10 THEN A=10 
620 IF B = >181 THEN B = 181 
630 IF B = <10 THEN B=10 
640 PUT SPRITE 0,(A,B),1,0 
840 GOTO 510 

El programa empieza inicializando 
la pantalla en la línea 10, mientras la 
línea 120 define la posición del punto 
de mira que se empleará más tarde. A 
continuación se dibuja el punto de 
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mira creando un sprite entre las líneas 
130 a 170; en la línea 280 preparamos 
la pantalla en modo de gráficos de alta 
resolución y de sprites ampliados; con 
las líneas 470 a 500 dibujamos un 
fondo que, aunque no es preciso para 
este programa, lo será cuando lo una- 
mos con el de la próxima sección. 

Una vez definido el sprite debemos 
utilizar un comando que controle 
nuestro joystick. Este comando es 
STICK. El número entre paréntesis 
selecciona el control desde el cursor; 
si es desde el primer joystick es 1; si es 
desde el segundo, es 2. De la línea 520 
en adelante chequeamos todas las po- 
siciones del joystick; cuando este che- 
queo detecta un cambio, el programa 
cambia los valores A o B encargados 
de almacenar la posición de la mira. 
Los valores que puede controlar el co- 
mando STICK y que dependen de la 
posición del joystick son: si detecta 
"1" arriba; "2" arriba a la derecha; 
"3" derecha; "4" derecha abajo; "5" 
abajo; "6" abajo a la izquierda; t4 7" iz- 
quierda; "8" izquierda arriba; cuando 
el joystick no esté en movimiento, el 
valor de STICK será "0". 

Desde la línea 600 a 630 se contro- 
lan las posiciones de la mira para que 
no salga de la pantalla y aparezca por 
el lado opuesto. La línea 640 repre- 
senta el punto de mira en pantalla, y, 
por fin, en la línea 840 devuelve el 
control del ordenador a la línea 510 
para que chequee de nuevo las posi- 
ciones que puede adoptar el joystick. 



PyR 

¿Se le puede agregar una rutina de 
4 'joystick" a cualquiera de los jue- 
gos que aparecen en INPUT? 

Sí, esto no encierra gran difi- 
cultad: simplemente hay que va- 
riar el núcleo del programa, el 
cual lee el teclado mediante la 
sentencia INKEY y sustituirlo 
por una rutina que lea el valor 
de STICK como la que hay en 
este programa y que está situada 
entre las líneas 520 y 540. 
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EL JUEGO DE LA CAZA 
DE PATOS 



Para los que no puedan esperar aque 60 PLAY"V10L30DEGDEGCDF 



se levante la veda o no quieran tiritar de 
frío en el campo, aquí presentamos una 
rutina de disparo contra los patos, que 
podréis utilizar junto con la rutina de 

joystick. 

Si has seguido atentamente el capí- 
tulo anterior, tendrás guardado en 
cinta un programa para mover por la 
pantalla el punto de mira. Pero aun- 
que resulte satisfactorio disponer de 
un programa de este tipo escrito en 
BASIC, tal como está no vale para 
mucho. 

Por eso el siguiente paso es utilizar 
la nueva rutina dentro de un programa 
de juegos. Al añadir las siguientes lí- 
neas de programa especialmente es- 
critas para tu máquina, tendrás un 
juego de caza de patos salvajes, aun- 
que naturalmente puedes dibujar tus 
propios gráficos y disparar contra 
aviones, búfalos, dirigibles o cualquier 
otra cosa que te sugiera tu fantasía. 

El objetivo del juego es abatir diez 
patos que aparecen en un corto inter- 
valo de tiempo en posiciones aleato- 
rias de la pantalla. El tanteo se basa 
en tu habilidad. Obtienes puntos por 
cada impacto, cuanto más rápido 
seas, más puntos obtendrás. 

Además por cada tiro fallido se te 
quitarán puntos. 

Carga en tu ordenador la rutina de 
joystick antes de teclear las nuevas 
líneas. A continuación añádele éstas 
y tendrás un programa de caza de pa- 
tos con puntuación incorporada: 

10 CLS:KEY0FF:C0L0R5,1, 

1:SCREEN0,0,0 
20 L0CATE8,8 

30 PRINT "EL JUEGO DE LOS 
PATOS" 

50 PRINT: PRINT: PRINT: PRINT: 
INPUT " ELIJA NIVEL DE 
JUEGO (1-8)";N 
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CDFDEGDEGCDFCDFFED" 
70 CLS:LOCATE10,13:PRINT" 
ESPERE UN MOMENTO" 




80 DIM X(1000),C(500) 
90 FOR U = l TO 10 
100 C(U)=10 
110 NEXT U 
120 A=120:B = 100 
130 A4$ = CHR$(&H0) 
A5$ = CHR$(&H10) 
A6$=CHR$(&H38) 
A7$ = CHR$(&H10) 
A8$ = CHR$(SH0) 
B2$ = CHR$(&H0) 



140 
150 
160 
170 
180 




■ 


USO DE LA RUTINA 


DE JOYSTICKS 


■ 


EL GRAFICO DEL PATO 


■ 


RUTINA DE TIEMPOS 


■ 


DETECCION DE LOS DISPAROS 



B3$=CHR$(&H4) 
B4$ = CHR$(&H7) 
B5$ = CHR$(&H76) 
B6$ = CHR$(&HFF) 
B7$ = CHR$(&HFF) 
B8$ = CHR$(&H0) 
A$=A4$+A5$+A6$+A7$ 
+ A8$ 

B$=B2$+B3$+B4$+B5$ 
+ B6$+B7$ + B8$ 

C$ = B$:D$ = B$:E$ = B$:F$ 
= B$:G$ = B$:H$ = B$:I$ = 
B$:J$ = B$:K$ = B$ 
SCREEN 2,3,0 
290 SPRITE$(0)=A$ 
300 SPRITE$(1) = B$ 
310 SPRITE$(2)=C$ 
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320 SPRITE$(3) = D$ 
330 SPRITE$(4) = E$ 
340 SPRITE$(5) = F$ 
350 SPRITE$(6) = G$ 
360 SPRITE$(7) = H$ 
370 SPRITE$(8) = I$ 
380 SPRITE$(9) = J$ 
390 SPRITE$(10) = K$ 
400 VU = 50 
410 FORU = 1TO10 
420 X(U)=INT(RND(-TIME)*100) 
430 Y(U) = VU:VU=VU + 10 
440 NEXT U 
460 CLS 

470 LINE (0,0)-(256,45),7,BF 
480 CIRCLE (150,40),20,ll, ll 
1.4 

490 PAINT (150, 40), 11 
500 LINE (0,45)-(256,191),5,BF 
510 S = STICK(0) 
520 IF S=l THEN B=B+10 
530 IF S = 2 THEN 

A=A+15:B = B-10 
540 IF S=3 THEN A=A+15 
550 IF S=4 THEN 

A=A+15:B = B+10 
560 IF S = 5 THEN B = B+10 
570 IF S = 6 THEN A=A- 

15:B = B+10 
580 IF S = 7 THEN A=A-15 
590 IF S=8 THEN A=A-15:B = B- 



1, 
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10 

600 IF A=>250 THEN A = 250 
610 IF A = <10 THEN A=10 
620 IF B = >181 THEN B = 181 
630 IF B = <10 THEN B=10 
640 PUT SPRITE 0,(A,B),1,0 
650 PUT SPRITE 1,(X(1),Y(1)) 
C(l),l 

660 PUT SPRITE 2,(X(2),Y(2)) 
C(2),2 

670 PUT SPRITE 3,(X(3),Y(3)) 
C(3),3 

680 PUT SPRITE 4,(X(4),Y(4)) 
C(4),4 

690 PUT SPRITE 5,(X(5),Y(5» 
C(5),5 

700 PUT SPRITE 6,(X(6),Y(6)) 
C(6),6 

710 PUT SPRITE 7,(X(7),Y(7)) 
C(7),7 

720 PUT SPRITE 8,(X(8),Y(8)) 
C(8),8 

730 PUT SPRITE 9,(X(9),Y(9)) 
C(9),9 

740 PUT SPRITE 10,(X(10), 

Y(10)),C(10),10 
750 FOR U = l TO 10 
760 X(U)=X(U)+N 
770 IF X(U) = >256 THEN 

C(U) = 0 
780 NEXT U 
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790 IFC(1) = 0ANDC(2) = 0ANDC 
(3) = 0ANDC(4) = 0ANDC(5) 
= 0ANDC(6) = 0ANDC(7) = 0 
ANDC(8) = 0ANDC(9) = 0AN 
DC(10) = 0THENGOTO990 

800 SPRITE ON 

810 ON SPRITE GOSUB 850 

820 STRIG(0)ON 

830 ON STRIG GOSUB 1080 

840 GOTO 510 

850 STRIG(0)ON 

860 ON STRIG GOSUB 890 

870 GOTO 840 

890 SPRITE ON 

900 ON SPRITE GOSUB 920 

910 GOTO 800 

920 UH=1:BEEP 

930 FOR U = 50 TO 140 STEP 10 

940 IF B = U THEN C(UH)=0 

950 UH=UH+1 

960 NEXT U 

970 PA = PA+1000*N 

980 GOTO 800 

990 SCREEN 0,0,0 

1000 COLOR 8 

1010 LOCATE6,10 

1020 PRINT "PUNTUACION:";PA 

1040 LOCATE 3,15:INPUT 

"OTRA VEZ?.. S/N" ; PR$ 

1050 IF PR$="S" OR PR$ = "s" 
THEN GOTO 90 ELSE 
1060 

1060 CLS:KEYOFF: LOCATE 10, 

10:PRINT"ADIOS 

PARDILLOS" 
1070 END \ 
1080 BEEP 
1090 RETURN 



De la línea 20 a la 70 se crea una 
presentación en la que se nos pregun- 
tará el nivel de dificultad entre 1-8, 
con el que queremos jugar. La línea 80 
dimensiona 2 variables que nos serán 
útiles más tarde. De la línea 90 a 1 10 
se asigna el color a cada uno de los pa- 
tos, mientras que desde la línea 180 a 
240 se diseña un sprite con un sencillo 
dibujo de un pato. Desde la línea 300 
a la 390 se asignan los números de 
sprites a cada uno de los patos. De la 
400 a 450 se asignan las posiciones 
aleatorias de los patos en la pantalla. 
Las líneas comprendidas entre 650 y 
740 se encargan de representar los 
diez patos en la pantalla. Desde la lí- 
nea 750 a 790 se consigue que los patos 
avancen a una determinada velocidad 
y que vayan desapareciendo conforme 
llegan al final de la pantalla. Las líneas 
800 y 810 son las encargadas de detec- 
tar si el sprite del punto de mira choca 
con el de algún pato; si esto ocurre el 
control pasa a la línea 850 y 860, 
donde se comprueba si se tiene pul- 
sado el botón de disparo; esto se hace 
con el comando STRIG. El valor en- 
tre paréntesis selecciona el botón dis- 
parador; éste será la barra espaciadora 
cuando el valor sea 0; el botón dispa- 
rador número 1 del joystick cuando el 
valor sea de 1 o 3, y el botón dispa- 
rador número 2 del joystick cuando los 
valores sean 2 o 4. Si no se tiene pul- 



sado el botón de disparo el control re- 
torna al programa; si, por el contrario, 
lo tenemos pulsado, el control pasa a 
las líneas 890 y 900, donde se com- 
prueba si el sprite del punto de mira 
aún está encima de alguno de los spri- 
tes de los patos. Si esto no es así el 
control retorna al programa; caso con- 
trario se ponen en acción las líneas 
comprendidas entre 920 y 980, donde 
se produce el sonido BEEP del dis- 
paro, se localiza el pato que ha sido 
alcanzado y a éste se le atribuye el co- 
lor 0 para que desaparezca. Después 
el control vuelve al programa. Es en- 
tonces cuando empieza una subrutina 
de fin de programa que se extiende 
desde la línea 990 hasta la línea 1070. 
Esta subrutina es llamada desde la lí- 
nea 790. 
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¿Qué hay que hacer para cam- 
biar el gráfico del pato por un 
blanco diferente? 

Simplemente hay que alterar los 
valores de las variables de las lí- 
neas 180 a 240, y para variar el 
color basta alterar la línea 100. 
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Programación 



MACROIMPRESION 



DESCRIPCION DEL PROGRAMA 

El programa presentado es un tra- 
ductor de códigos para impresión de 
textos en macroüpos en la impresora, 
es decir, genera textos impresos de ta- 
maño superior al normal en la impre- 
sora, pudiendo seleccionar la escala de 
ampliación. 

El autor ha creado una aplicación 
que permite la escritura en la impre- 
sora tanto en sentido horizontal 
(modo normal), que puede ser em- 
pleado como encabezamiento de pro- 
gramas o trabajos listados por impre- 
sora, o bien, en sentido vertical, que 
será empleado para generar grandes 
textos propagandísticos o señalizacio- 
nes diversas. 




El aumento se consigue leyendo en 
memoria los 8 bytes que componen 
cada carácter, haciendo uso para esto 
de la función BASE(2), que nos da la 
dirección de comienzo de la tabla de 
caracteres multiplicada por 8 (longitud 
de cada carácter) y le sumamos el có- 
digo ASCII del carácter en cuestión. 
Así calculamos la dirección inicial del 
carácter deseado. 



IMPRESION VERTICAL 

Localizado en las líneas 130 a 350, 
primeramente cambia el interlineado 
de la impresora a l/g' (240 LPRINT 
C I IR$(27)"B") para unir los caracte- 
res gráficos. 







El bucle A (lin 250) se mueve a lo 
largo del texto a imprimir. El bucle B 
apunta al bit a comprobar, y el bucle 
C (Hn 280) se mueve desde el último 
al primer byte de la letra para girarla 
90°. 



IMPRESION HORIZONTAL 

Líneas 350 a 380. Se leen secuen- 
cialmente todos los bits de los ocho 
bytes del carácter, y en caso de encon- 
trar algún «uno» se almacena en la ca- 
dena de trabajo C$. Una vez comple- 
tado el carácter, se pasa la informa- 
ción a la cadena D$ para poder con- 
tinuar con la siguiente letra. Una vez 
completada la cadena de entrada se 
imprime D$. 



NOTAS DE INTERES 

Se observará que para la construc- 
ción de la cadena B$ a partir de la lec- 



tura de memoria, se inicializa esta ca- 
dena con «ceros». Esto es debido a 
que la función BIN$ retorna un nú- 
mero binario, pero sólo da cifras a 
partir del primer -uno» de la izquierda 
(primer bit significativo), con lo que se 
hace necesario rellenar por la iz- 
quierda, y recuperar después los S dí- 
gitos del byte por la derecha. 



COMENTARIOS 

El programa está bien resuelto, y la 
documentación aportada es bastante 
completa. Debemos recordar que se 
debe huir en lo posible del empleo de 
caracteres especiales dentro del lis- 
tado del programa, que como es sa- 
bido crean problemas a la hora de sa- 
car un listado por la impresora. Es 
aconsejable emplear caracteres estan- 
dard ASCII, o bien, incluir en el pro- 
pio listado una definición clara del ca- 
rácter especial empleado. Solamente 



así, otros lectores podrán entrar el 
programa en sus ordenadores con ga- 
rantías de éxito en su funcionamiento, 
evitando las siempre tediosas puestas 
en marcha. 

REM ******************* 

2 REM * 

3 REM * PROGRAMA: 
MACRO-IMPRESION 

4 REM * 

5 REM * AUTOR: F. 
CARBALL0 RUBIRA 

6 REM * * 

7 REM * 

8 REM * 

9 REM ******************* 
10 CLS:CLEAR 400:DEFSTR I 
20 LOCATE 8, 

1:PRINT" = = = = = = = = = = = 

30 LOCATE 8, 

2:PRINT" = ":L0CATE 26, 
2:PRINT" = " 



40 LOCATE 8, 3:PRINT"= 110 IF l = CHR$(27) THEN 

MACRO IMPRESION =" CLSrEND 

50 LOCATE 8, 115 IF l = "3" THEN GOSUB 700 

4:PRINT" = ":L0CATE 26, 120 GOTO 10 

4:PRINT" = " 130 REM SUB.MACRO- 
60 LOCATE 8, IMP.VERTICAL 

5:PRINT" = = = = = = = = = = = 140 CLS 

70 LOCATE 2, 150 PRINT 

8:PRINT"IMPRESI0N 160 INPUT "DAME TEXTO ";A$ 

VERTICAL 1" 170 PRINT 

80 LOCATE 2, 180 PRINT:INPUT "DAME 

10:PRINT"IMPRESION CARACTER (ENTER = bla) "¡ 

NORMAL 2" Z$:PRINT:PRINT:IF Z$ = "" 

90 LOCATE 2, 

12:PRINT"AJUSTE 

IMPRESORA 3" 

95 LOCATE 2, 14:PRINT"FINAL 

DE PROCESO >ESC<" 

100 l = INKEY$:IF 1 = "" GOTO 

100 ELSE IF l = "l" GOTO 

140 ELSE IF l = "2" GOTO 

360 



THEN Z$ = "é":REM Graf 
cuadr en blanco 
190 INPUT "DAME ESCALA (1 a 

11)";N 

200 IF N = 0 THEN N = 2 
210 PRINT:PRINT 
220 PRINT "QUIERES 

CENTRADO AUTOMATICO 

(S/N)" 

230 l = INKEY$:IF 1 = "" THEN 
230 ELSE IF l = "S" OR 
l = "s" THEN MAR = 44-4*N 
ELSE PRINT: INPUT "DAME 




240 
250 
260 
270 
280 
290 



TABULADOR "¡MAR 

LPRINTCHR$(27)"B" 

FOR A=l TO LEN(A$) 

B$ = MID$(A$,A,1) 

FOR B=l TO 8 

FOR C = 7 TO 0 STEP-1 

IF MID$(RIGHT$("000000 

00" + BIN$(VPEEK(BASE(2 

) + 8*ASC(B$) + C)).8),B,l) 



300 
310 



320 
330 
340 

350 

360 

370 
380 



Programa'' 0 " 1 



="1"THEN 

C$=C$ + STRING$(N,Z$) 
ELSE C$ = C$ + SPACE$(N) 
NEXT C 
FOR U=l TO 
NÑ2:LPRINTTAB(MAR) 

C$:NEXT U:C$="" 
NEXT B 
NEXT A 

LPRINTCHR$(27)"A":GOSUB 
590:PRINT:GOTO 140 
REM SUB.MACRO- 
IMP.HORIZONTAL 
CLS:PRINT:INPUT"DAME 
TEXTO ";A$ 
PRINT 

PRINT:INPUT"DAME 

CARACTER (ENTER=EL 

SUYO)";X$ 

PRINT:PRINT:INPUT"DAME 



400 
410 
420 

430 
440 
450 



460 
470 



490 
500 
510 



ESCALA (ENTER = 2) ";N 
PRINT:PRINT 
IF N = 0 THEN N = 2 
'BUCLE QUE INVESTIGA EN 
LOS 8 BITS DE CADA LETRA 
'IF LEN(A$)>8 GOTO 360 
FOR A=0 TO 7 
'BUCLE QUE SE MUEVE A 
LO LARGO DE LA CADENA 
PARA LEER LOS 8 BITS DE 
CADA UNO DE LOS 8 BYTES 
DE LA LETRA 
FOR B=l TO LEN(A$) 
B$ = "00000000":E$ = MID 
$(A$,B,1) 

B$ = B$ + BIN$(VPEEK(BAS 
E(2) + 8*ASC(E$) + A)) 
B$ = RIGHT$(B$,8) 
FOR S=l TO 7 
IF MID$(B$,S,1) = "0" THEN 
C$=C$+SPACE$(N):GOTO 
530 



■ 




programación 



0¿y) 


I C Yí w» TUCM 

Ir Aj> = 1 HLiN 


620 IF 1= N OR 1= n OR 


820 


IF l="A" OR l = "a" THEN 






1 r> l_l D <T / O "7 \ TU TM ni IM 

l=CHR$(27) THEN RUN 


LPRINTCHR$(14); 




tLbt C$ = C:j> + STRING$(N, 


r* *~\ rk r\~rr\ r rkrk 

630 GOTO 600 




:PRINT"EXPANDIDA " 




X$) 


700 REM IMPRESORA 


830 


IF l = "E" OR l = "e" THEN 


OoJ¿) 


MCVT C 

INLa 1 b 


710 CLS:PRINTTAB(10) 


LPRINTCHR$(27)"E"; 




US> = ü;j> + C$:C$ = : A j ADE 


IMPRESORA 




:PRINT"ELITE " 




CARACTERES A LA CADENA 


720 PRINTrPRINT 


835 


IF l = "l" OR l = "¡" THEN 




U$ Y LIMPIA LA CADENA DE 


~t rk nn i MTiir\/n a n n i r> a 

730 PRINT EXPANDIDA 




LPRINTCHR$(27)"4"; 




TD ADA IA Pí 
1 K AbAJU C$ 


A" 




:PRINT"ITALICA " 


ooy) 


M L7VT D 
ÍN t A 1 D 


~t A rk nn i mtii r~ i i ~r r™ t— » » 

740 PRINT ELITE E 


840 


IF l = "Q" OR l = "q" THEN 


Db(¿) 


rA O 1 1 1 TA MAIO 1 nniMT 

rUK U=l ÍU NN2:LPRINT 


750 PRINT COMPRIMIDA 


LPRINTCHR$(27)"Q"; 




U$:INLa 1 


/^V II 

Q 




:PRINT"COMPRIMIDA" 




U:D$= : IMrKIML Y 


1 C rk nniMTHITAI 1 r\ A iM 

760 PRINT ITALICA 1 


o c rk 

850 


IF l = "X" OR l = "x" THEN 




Ll Mrl A U$ 


~I ~J rk n n i k. i T "Oí i n n a \/ a n r\ 

770 PRINT SUBRAYADO 




LPRINTCHR$(27)"X"; 


0 /y) 


MFYT A 

IN La 1 A 


X 




:PRINT"SUB RAYADO " 


0O¡¿) 


Aac i id enrt nniMT r*ATA 

bUbUB by0:PRINT:GOTO 


780 PRINT RESETEO R 


860 


IF l = "R" OR l = "r" THEN 




ooy) 


~i r\rk nn i mt nn i MTim a i in 

790 PRINT:PRINT SALIR.... 




LPRINTCHR$(27)"cl"; 




LOCATE 8,20:PRINT OTRA 


n i 1 1 o a n r~ o r\ ii 

PULSAR ESC 




:LPRINTCHR$(7); 




VEZ (S/N) " 


R(h(l\ 1 nPATF 1 1 n. PR 1 MT'TMTDr 




:rKIIN 1 KtoL 1 LU 


600 


l=INKEY$ 


OPCIONMOCATE 15,16 


870 


IF l=CHR$(27) THEN 


610 


IF l = "S" OR l = "s" THEN 


810 l = INKEY$:IF 1 = "" GOTO 




RETURN 




RETURN 


810 


880 


GOTO 800 
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LOTO MSX 



Muchos de los lectores de INPUT MSX habrán sentido en muchas ocasiones el deseo de «jugar» en 
algún juego de apuestas múltiples, como la quiniela futbolística o la quiniela hípica, y tal vez, desde 
hace poco más de un año, al «loto». Algunos, más interesados, tal vez empleen los denominados 
sistemas de reducción con la doble finalidad de maximizar las posibilidades reduciendo a su vez el 
gasto. Pues bien, el presente programa está hecho justamente para eso, para suprimir el tedioso 

trabajo de realizar la reducción de forma manual. 
El programa que presentamos ahora solicita de entrada la cantidad de números sobre los cuales se 
desea jugar (línea 20 del programa; obvio es decir que este número jamás será igual o inferior a seis). 
En la siguiente línea nos solicita el nivel de reducción al cual deseamos jugar (5, 4 o 3). 
Las líneas 50-100 son las encargadas de crear una matriz unidimensional en donde almacenamos 
los números concretos sobre los que deseamos jugar, y nos los solicita mediante un input inserto en 

un bucle. 

Las líneas 120-190 y 350-400 son las encargadas de crear todas las combinaciones posibles de 
seis números con la cantidad de números que deseemos jugar. Esto da lugar a grandes cantidades de 
posibles apuestas que se ven reducidas por obra del procedimiento expresado en las líneas 200-310. 

Una vez determinadas las combinaciones que nos resultan útiles, son almacenadas mediante las 
líneas 330-340 en la matriz que previamente hemos dimensionado en la línea 130 y que tú puedes 
alterar en función de la disponibilidad de memoria que poseas y del número de combinaciones que 

preveas que puedan resultar. 
La subrutina llamada desde la línea 410 se encarga, una vez realizado todo el procedimiento, de 
ajustar la matriz de combinaciones resultante a una matriz de expresión directa de las combinaciones 
que has de jugar en función de los números que tú indicaste en las líneas 50-100. 

10 CLS:KEYOFF:WIDTH 40 
20 INPUT "Cuántos números" ; N 
30 INPUT "Reducción al ";R 
40 CLS 

50 LOCATE 4,10:PRINT "INTRODUCIR LOS NUMEROS POR ORDEN" 

60 DIM H(N-l) 

70 FOR G = 0TO N-l 

80 INPUT "Numero a jugar: " ; N1 

90 H(G) = N1 
100 NEXTG 
110 CLS 

120 LOCATE 10,12:PRINT "ORDENADOR PROCESANDO" 

130 DIM M(100,5):CO=0:CR = 0 

140 FOR A=l TO N-5 

150 FOR B=A+1 TO N-4 

160 FOR C = B+1 TO N-3 

170 FOR D=C+1 TO N-2 

180 FOR E=D+1 TO N-l 

190 FOR F=E+1 TO N 

200 CR=0 

210 FOR K=CO TO 0 STEP -1 
220 FOR T=0 TO 5 
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230 IF A = M(K;T= + ) THEN GOTO 440 
240 IF B = M(K,T) THEN GOTO 440 
250 IF C = M(K,T) THEN GOTO 440 
260 IF D = M(K,T) THEN GOTO 440 
270 IF E = M(K,T) THEN GOTO 440 
280 IF F=M(K,T) THEN GOTO 440 
290 NEXTT 
300 CR = 0 
310 NEXT K 

320 REM Combinación válida 

330 M(CO,0) = A:M(CO,1) = B:M(CO,2) = C : M(CO,3) = D:M(CO;4) = E:M(CO,5) = F 

340 CO=CO+l 

350 NEXT F 

360 NEXT E 

370 NEXT D 

380 NEXT C 

390 NEXT B 

400 NEXT A 

410 GOSUB 460 

420 PRINT "MUCHA SUERTE" 

430 END 

440 CR = CR + 1:IF CR = >(6-R) THEN GOTO 350 

450 GOTO 290 

460 DIM MF(CO-l,5) 

470 FOR G = 0 TO N-l 

480 FOR P=0 TO CO 

490 FOR Q=0 TO 5 

500 IF M(P,Q) = G+1 THEN MF(P,Q) = H(G) ELSE GOTO 520 

510 M(P,Q) = 0 

520 NEXT Q 

530 NEXT P 

540 NEXT G 

550 CLS 

560 LOCATE 10,2:PRINT " COMBINACIONES A JUGAR" 
570 PRINT.PRINT:PRINT 
580 FOR L = 0 TO CO-1 

590 PRINT MF(L 1 0);TAB(5);MF(L,1) ; TAB(5),MF(L;2);TAB(5);MF(L 1 3);TAB(5);MF(1,4);TAB(5)- 
MF(L,5), 

600 NEXT L 

610 RETURN 

Como podrán apreciar los lectores, el programa tiene como principal característica su gran 
simplicidad, pero por esta misma razón resulta excesivamente lento de procesar; por ello mismo el 
artículo queda abierto a la colaboración de los lectores que quieran enviar sus ideas a la redacción de 
INPUT aportando las posibles mejoras que se les ocurran. 

Para dar una posible idea de las dificultades con que los usuarios pueden encontrarse os daremos 
unos pocos ejemplos. 

El ciclo expuesto en las líneas 140-400 tiene la necesidad de examinar si deseáis combinar 12 
números un total de 924 apuestas diferentes. Este número se eleva a 5005 si los números a 
combinar son 15, y llega hasta la cifra de 38760 si deseáis combinar 20 cifras. Todo ello os dará 
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una ¡dea de las dificultades en lo relativo a tiempo de procesamiento que encontraréis si no os es 
posible encontrar unas rutinas que aceleren la ejecución. 

Por otro lado, y para indicaros alguna ventaja, os puedo decir que una apuesta de diez números 
que en directo tiene un precio de 10.500 pesetas queda reducida a sólo dos apuestas con un coste 
de 100 pesetas-, las 924 apuestas de 12 números se ven reducidas a sólo 4 apuestas y las 5005 de 
15 números se quedan en únicamente 7 apuestas a realizar. 




Ayúdanos a ayudarte 



Puedes ganar 25.000 pts. 
o tu juego preferido 

Encuesta para conocer tu perfil y preferencias 

Hace ahora un año, la redacción de INPUT se inundó de encuestas enviadas por vosotros, los lectores. Gracias a esa entusiasta 
acogida fue posible conocer a fondo vuestras inquietudes y ajusfar a ellas los contenidos de la revista. 
Ahora, esta nueva encuesta pretende saber hasta qué punto hemos conseguido ese objetivo, y enterarnos de por dónde van ahora 
vuestras exigencias, siempre pensando en que INPUT siga siendo una herramienta indispensable para vuestros primeros escarceos 
por el mundo de la informática. 



1 . ¿Tienes ordenador? Sí □ No □ 15. 

2. En caso afirmativo. ¿Cuál? 

Marca Modelo 

3. ¿Cuánto tiempo hace que lo posees? 

4. ¿Qué periféricos y accesorios tienes? 

5. ¿Desde qué número lees INPUT? 

6. ¿Con qué frecuencia la adquieres? 

TODAS □ DE VEZ EN CUANDO □ OTROS □ 

7. ¿Cuántas personas leen tu ejemplar de INPUT? 

Sólo yo □ Yo y mis amigos □ 1 6. 

Mi hermano, mi padre y yo Q Mi hermano y yo □ 

8. ¿Lees toda la revista? Sí □ No Q 

9. ¿Tecleas los programas que publicamos? 17 
Todo □ 

Casi todo □ 
Alguna cosa □ 

Nadan 18. 

10. Califica qué secciones te gustan más con mayor 
puntuación (10 a 0) 

Programación 

Código Máquina 

Robótica 

Coleccionare 

Revista Software 19. 

Aplicaciones 20. 

Actualidad 

Libros 

Buzón 21. 

Educación 

Inteligencia Artificial 

El micro Z-80 22. 

11. ¿Qué secciones o temas echas de menos en IN- 
PUT? 

1 2. ¿Crees que alguna sección debe ampliarse? ¿Cuál? 

13. ¿Cuál debería reducir su extensión? 23. 

14. ¿Tienes en cuenta los comentarios sobre juegos 24. 
(Revta. de Software) a la hora de adquirirlas en el 
mercado? 25. 
Al 100 % □ En gran medida □ Poco Q Nada □ 26. 



De 21 a 25 años Q 
De 26 a 35 años tj 
De 36 a 45 años y 
Más de 45 años □ 



¿De todos los artículos que has leído en INPUT, nos 
podrías destacar algunos? 

N.° 1 

N.° 2 

N.° 3 

N.° 4 

N.° 5 

N.° 6 

SOBRE TI 
Sexo: 

M □ F □ 
Edad: 

Hasta 1 2 años □ 
De 1 2 a 1 4 años 
De 1 5 a 1 7 años 
De 1 8 a 20 años _ 
¿Cuál es tu situación? 
Estudio enseñanza básica n 
Estudio enseñanza media □ 
Estudio enseñanza Universitaria □ 
Estoy parado □ 

Trabajo (en este último caso responde a la siguiente 
pregunta) □ 

¿Cuál es tu profesión? 

¿Con qué objetivo adquiriste tu ordenador? 
Jugar Q Educativo □ Música □ 

Utilidades □ Profesionales □ Dibujo □ 
¿Cuál es tu nivel de conocimientos de informática? 
0 □ Bastante □ Aficionado con exp. □ 
Profesional □ 

Aparte de la informática, ¿qué otras aficiones tie- 
nes? 

Deporte □ Cine □ Música Q F 

Vídeo □ Pintura □ Teatro H 

Motociclismo □ Fotografía □ 

¿Estás satisfecho con tu ordenador? 

En caso de que te tuvieses que comprar otro, ¿por 

cuál te decidirías? 

¿Lees otras revistas de informática? Sí □ No □ 
¿Cuáles? 



Entre los que contestéis a esta encuesta, se sorteará un premio en metálico de 25.000 pts. y diez programas a elegir por los 
agraciados. Así, que escribe tus datos para participar. La fecha límite es el próximo 5 de marzo. No es preciso que contestes las 
preguntas para las que no tengas respuesta. Tampoco es necesario que las respuestas sean favorables a nuestra labor para que 
puedas participar en el sorteo. Critícanos si honestamente crees que debes hacerlo. Envíanos este cuestionario o su fotocopia a 
ENCUESTA INPUT MSX, Aribau, 185, 1.° - 08021 Barcelona 



Nombre Apellidos 

Edad Dirección 

Teléfono de contacto Gracias y suerte con el premio. 



Dto. Postal 



NUMEROS 
BAJO CERO 



■ 


LOS NUMEROS NEGATIVOS 


SE HACEN NECESARIOS 


■ 


PROGRAMA DE CONVERSION PARA 


NUMEROS NEGATIVOS 


■ 


LA CONVENCION DEL SIGNO 



La comprensión de los números bi- 
narios y hexadecimales no suele ser di- 
fícil, pero la expresión de valores ne- 
gativos con estos sistemas de numera- 
ción puede presentar problemas. 

En la programación de algunos jue- 
gos puede ser necesario utilizar valo- 
res negativos, por ejemplo, para des- 
plazarse sobre la pantalla en determi- 
nadas direcciones. Las direcciones van 
codificadas en grupos de ocho bits, ya 
que esa es la única manera en que el 
ordenador puede almacenar los datos 
en su memoria. Pero surge un proble- 
ma: como hemos visto, un byte puede 
representar cualquier número desde 0 
hasta 255, es decir, desde 0000 0000 
hasta 1111 1111. Pero con esto se ago- 
tan las posibilidades de un número bi- 
nario de ocho bits, que ya no tiene si- 
tio para un signo menos o más, ni for- 
ma alguna de representarlo. 

En la aritmética ordinaria, al restar 
1 de 0 se obtiene el valor — 1 ; aquí tie- 
nes ese mismo cálculo realizado con 
números binarios de ocho bits: 

0000 0000 

- 1 



1111 1111 



Puedes probar a tomar un 1 presta- 
do de la columna situada más a la iz- 
quierda, pero cuando el número bina- 
rio está limitado a ocho bits no hay 
manera de hacer nada. Análogamen- 
te, al restar otro 1 (en la aritmética 
tradicional se obtendría como resulta- 
do un -2) tenemos 1111 1110, que en 
binario corresponde al número deci- 
mal 254, ya que 1111 1111 es 255. 

Esto no son curiosidades típicas de 
los números binarios: imagínate por 
ejemplo lo que ocurriría en decimal si 
sólo hubiese tres sitios o columnas en 
las que poner los números. Mira lo 



que sucedería si se intentase sumar 
100 a 999 con estas limitaciones: 

100 

+ 999 



(1)099 



El uno que figura en la columna de 
las unidades de mil, está escrito entre 
paréntesis; en un sistema aritmético 
con sólo tres columnas no hay espacio 
para las que «te llevas». En un siste- 
ma de sólo tres lugares, el resultado 
de esta suma es pues 99, o sea, exac- 
tamente el resultado de 100 menos 1 . 

De la misma forma, sumar 998 con 
100 en un sistema de tres lugares equi- 
vale a restar 2, mientras que restar 998 
de 100 equivale a sumarle 2. 

En conclusión, una misma sucesión 
de números de un byte puede repre- 
sentar un número positivo o negativo, 
sin tener en cuenta la posible confu- 
sión o dificultad en el cálculo. 

¿Qué hacer entonces? En la mayo- 
ría de las aplicaciones de los ordena- 
dores domésticos, este problema no 
suele plantearse: tanto las direcciones 
de memoria como los códigos de ope- 
ración, ambos expresados en binario, 
pueden considerarse siempre como 
positivos. Las únicas ocasiones en que 
se encuentran números negativos son 
en los datos o en los saltos del código 
máquina, equivalentes a los GOTOs 
del BASIC. 

CAMBIANDO LOS BITS 

Para pasar de un valor en binario 
positivo a su correspondiente negati- 
vo, hay que aplicar el llamado proce- 
dimiento del complemento a 2; no tie- 
ne una base teórica de fácil compren- 
sión, pero sin embargo funciona bien. 

Para pasar desde un número en bi- 
nario a su correspondiente valor nega- 
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tivo, hay que cambiar los ceros por 
unos y viceversa, sumando al final 1 al 
resultado. 

El siguiente programa realiza preci- 
samente esta función. Observa que 
cuando el número en binario está li- 
mitado a ocho cifras, su equivalente 
en hexadecimal consta exactamente 
de dos cifras: esto quiere decir que 
también el equivalente hexadecimal 
del complemento a 2 es el correspon- 
diente valor negativo. 

10 CLS:L0CATE 3,0:PRINT 

"NUMEROS EN COMPLEMENTO A 
2" 

20 LOCATE 1 ,2:PRINT"DEC"; 
TAB(14);"BIN";TAB(28); 
"HEX" 

50 LOCATE 6,7:PRINT" 



70 LOCATE 8,8:PRINT 
"COMPLEMENTO A 1" 
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80 LOCATE 3,10:PRINT"+": 
LOCATE 30,10:PRINT M +" 

90 LOCATE 8,15:PRINT 
"COMPLEMENTO A 2" 

92 LOCATE 0,18: PRINT" — 



94 LOCATE 8,19:PRINT 
"00000000" 

95 C=0 

99 REM*** IMPRESION VALORES 

100 DD=-C 

110 LOCATE 0,4:PRINT USING 

"###//"; C 
115 LOCATE 0,17:PRINT USING 

"####";DD 
120 Z=C:GOSUB 310.-LOCATE 

29,4:PRINT A$ 
130 Z=DD:GOSUB 310:L0CATE 

29,17:PRINT A$ 
140 Z=C:GOSUB 320 : F=4 :GOSUB 

330 

150 Z=DD:GOSUB 320:F=17: 

GOSUB 330 
160 Z=NOT(C) :GOSUB 320:F=10: 

GOSUB 330 
230 B=STICK(0):B$=INKEY$: 

IF B=0 AND B$="" 

THEN 230 
240 IF B=1 THEN C=C-1 : 

IF C=-129 THEN C=127 

:BEEP 

250 IF B=5 THEN C=C+1 : 
IF C=128 THEN C=-128 
:BEEP 

260 IF B$=" " THEN LOCATE 

0,20:INPUT CiLOCATE 0,20: 
PRINT" 

265 IF B$<>" " AND B<>1 AND 
B<>5 THEN GOTO 230 

270 GOTO 100 

300 REM*** SUBRUTINAS 

310 A$=STRING$(2-LEN(RIGHT$ 
(HEX$(Z),2)),"0"):A$=A$+ 
RIGHT$(HEX$(Z),2): 
RETURN 



320 



330 
340 

350 



A$=STRING$(8-LEN( RIGHTS 
(BIN$(Z),8)),"0"):A$=A$+ 
RIGHT$(BIN$(Z),8) : 
RETURN 

FOR A=1 TO 8 

LOCATE 6+2*A,F:PRINT 

MID$(A$,A,1) 

NEXT A: RETURN 



El programa consta de tres partes 
bien diferenciadas. La primera, desde 
la línea 10 hasta la 95, se ocupa de pre- 
sentar en pantalla los encabezamien- 
tos de las distintas columnas de núme- 
ros. Cuando lo ejecutes verás en la lí- 
nea superior la representación deci- 
mal, binaria y hexadecimal de un nú- 
mero. Hacia la mitad de la pantalla 
aparece la representación binaria del 
complemento a 1 del citado número. 
Este complemento a 1 se obtiene sin 
más que cambiar los ceros por unos, y 
viceversa, en el número binario origi- 
nal. También podemos considerar que 
el complemento a 1 de un valor bina- 
rio A cualquiera, no es más que el re- 
sultado de NOT(A). Por último, en la 
línea inferior de la pantalla se repre- 
senta el complemento a 2 del número, 
en decimal, en binario y en hexadeci- 
mal. El complemento a 2 se obtiene 
sin más que sumar 1 al valor del com- 
plemento a 1. 

La segunda parte del programa, en- 
tre las líneas 99 y 160, se ocupa de lle- 
var a cabo los cálculos necesarios y de 
presentar los valores actualizados en 
la pantalla. El cálculo de los valores 
del complemento a 1 y del comple- 
mento a 2 se lleva a cabo utilizando al- 
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Marino López García 
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Óscar Larrea García 
Jordi Cadellans Bausili 
Prudencio Fuente Reizábal 
Carlos Murilio Blasco 
Javier Galán de Arribas 
Pablo Zumel Vaquero 
Julián Santos Alcón 
Miguel Ferreiro Lorenzo 
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Almería 
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Casetas (Zaragoza) 

S. Boi de Llobregat (Barna) 

Barcelona 

Burgos 

Cáceres 

Vigo (Pontevedra) 


Le Mans II 
Green Beret 
Hyper Rally 
Green Beret 
Flight Deck 
Goonies 
Nemesis 

International Karate 
Green Beret 
Jack de Nipper 




gimas de las funciones del BASIC 
MSX como por ejemplo el operador 
lógico NOT y las funciones de conver- 
sión de base HEX$ y BIN$. En esta 
parte del programa se hacen llamadas 
a las subrutinas de las líneas 300 a 350, 
que se ocupan del manejo de las ca- 
denas de caracteres con los valores bi- 
narios y hexadecimales. Es necesario 
trocear y manipular estas cadenas me- 
diante las funciones LEFT$, RIGHT$ 
y MID$, para obtener una correcta 
presentación en pantalla. 

La última parte del programa, com- 
prendida entre las líneas 230 y 270, se 
ocupa de la entrada de datos desde el 
teclado. Cuando ejecutes el progra- 
ma, verás aparecer en pantalla la re- 
presentación en complemento a 1 y 
complemento a 2 del número cero. 
Para avanzar en el sentido de los nú- 
meros positivos no tienes más que pul- 
sar la tecla de CURSOR ABAJO. Por 
el contrario, para los números negati- 
vos tienes que pulsar la tecla de CUR- 
SOR ARRIBA. Pulsando estas teclas 
podrás aumentar o disminuir los nú- 



meros de uno en uno. Si quieres ir más 
deprisa sólo tienes que pulsar la barra 
de espacios y a continuación teclear el 
número cuyos complementos deseas 
conocer. 



LA CONVENCION DEL SIGNO 

Como ya hemos dicho, para muchos 
fines un número en binario o en hexa- 
decimal corresponde perfectamente a 
un número positivo o negativo. Sin 
embargo hay ocasiones en que se quie- 
re conocer si un número es positivo o 
negativo. 

Los saltos realizados en los progra- 
mas en lenguaje máquina requieren 
que se especifique el número de bytes 
que abarcan, en valores positivos si el 
salto es hacia adelante y negativos si 
el salto es hacia atrás. El ordenador 
examina el primer bjt del número en 
binario y determina por sí solo si se 
trata de un número positivo o negati- 
vo. Si el primer bit es un 1, el orde- 
nador considera el número como ne- 



gativo, mientras que si es 0 lo toma 
como positivo. 

Este procedimiento se ajusta a una 
determinada convención de signos. 
Esto significa que el ordenador, en vez 
de manejar números binarios que va- 
nan entre 0 y 255, considera que su 
margen de variación va desde -128 a 
+ 127. En el programa de conversión 
en complemento a 2, habrás oído la 
señal de «bip» al llegar a 128. Esto se 
debe a que 128, que en binario es 1000 
0000 y en hexadecimal es 80, corres- 
ponde a un valor negativo. (Haz la 
prueba: -1000 0000 + 1000 0000 = 
(1)0000 0000, que es 0 en binario de 
ocho bits; 80 + 80 = (1)00, que es 0 
en hexadecimal de dos cifras; 128 - 
128 = 0 en decimal.) 

¿Qué es lo que sucede entonces? 
Dado que 1000 0000 tiene un 1 en su 
primer bit, el ordenador lo considera 
como un número negativo, el -128. 
Por otra parte el cero, que es 0000 
0000, tiene un 0 en su primer bit, por 
lo que el ordenador lo toma como un 
número positivo. 
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GEN MON 

EL DESENSAMBLADOR 
MAS ESTANDAR 



ARGUMENTOS 
C ni, n2, 11, 12 



O 
ce 
O 

< 



<return> 



Cadenas literales con 
un número máximo de 
20 caracteres cada una 



Números enteros entre 1 y 
65535 que se pueden escri- 
bir en forma hexadecimal, 
decimal o binaria. 



El nombre de uno de los co- 
mandos, que es siempre 
una letra y es indiferente 
que sea mayúscula o minús- 
cula. 



MSX DEVPAC es el nombre con- 
j unto de una herramienta de trabajo en- 
samblador/editor (GEN) desensambla- 
dor/monitor (MON) producido por HI- 
SOFT y comercializado en España por 
SONY ¡ndescomp, muy parecido al es- 
tándar de Zilog, y es uno de los mejores, 
por no decir el mejor de los que hay ac- 
tualmente en el mercado. En esta pri- 
mera parte del artículo haremos un co- 
mentario general sobre los mismos. En 
el siguiente número trabajaremos con 
programas concretos que nos ejempli- 
fiquen su utilidad. 

Pasemos a comentar de entrada el 
editor GENMSX. En primer lugar no- 
tamos que GEN se puede colocar en 
cualquier parte de la memoria del or- 
denador siempre que no se entre en 
contacto con el sistema operativo. 

Así lo podemos ubicar de la si- 
guiente forma: 

BLOAD"CAS:GENMSX" 
DEFUSR = &H8800 
A=USR(&HXXXX) 

donde &HXXXX es la posición en la 
que se desea comience el editor. 

Ejecutado el programa se entra di- 
rectamente en modo de edición, mos- 
trándonos la pantalla un amplio menú 
de elecciones. Podemos introducir en- 
tonces cualquiera de los comandos del 
editor, que se estructuran de la forma 
señalada en el cuadro l: 

Según los comandos, los argumen- 
tos pueden ser obligatorios o no, y al- 
gunos sólo tienen efecto si se declaran 
explícitamente determinados argu- 
mentos. 

Veamos aquí los comandos, sintaxis 

y descripción: 

* Comando B (Bye) 

Descripción: Devuelve el control al 
BASIC. Para volver a GEN desde 



este último hacer: 

DEFUSR-&HFFF0 
A=USR(0) 

* Comando C (Current State) 
Descripción: Informa sobre los va- 
lores actuales del delimitador y de 
los argumentos ni, n2, 11, 12. El de- 
limitador generalmente es una 
coma. 

* Comando D (Delete) 
Sintaxis: D<nl, n2> 
Descripción: Borrar del fichero de 
texto todas las líneas comprendidas 
entre la ni y n2. 

Comando E (Edit) 
Sintaxis: E n 

Descripción: Edita la línea número n 
para permitir su modificación con 
ayuda del cursor y de los comandos 
de edición del MSX. 

* Comando F (Find) 
Sintaxis: F ni, n2, II, 12 
Descripción: Busca la cadena literal 



II a lo largo de las líneas compren- 
didas entre ni, n2. 

* Comando G (Get text) 
Sintaxis: G, 11 

Descripción: Carga de cinta un fi- 
chero de texto. 

* Comando H {Help) 
Descripción: Muestra la pantalla de 
ayuda. 

* Comando / (Inserí) 
Sintaxis: : I, ni, n2 
Descripción: Inserta texto, propor- 
cionando automáticamente núme- 
ros de línea comenzando por la lí- 
nea ni e incrementándola a razón 
de la cantidad n2. 

* Comando J (Jump patch) 
Descripción: Comando definible a 
voluntad del usuario. 

* Comando K (¡Configure) 
Sintaxis: K n (n mayor o igual a 100 
bytes) 

Descripción: Reserva una zona de n 
bytes para almacenar las definicio- 
nes de las macroinstrucciones en 
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tanto dura el ensamblado. 

* Comando L (List) 
Sintaxis: L ni, n2 
Descripción: Lista en pantalla las lí- 
neas ni a n2. 

* Comando M (Move) 
Sintaxis: M <nl, n2, n3> 
Descripción: Mueve un bloque de 
líneas que van de la ni a n2, ha- 
ciendo que se coloquen inmediata- 
mente antes de la línea 3, para lo 
que se renumeran las líneas n3 y 
posteriores si es necesario. 

* Comando N (reNumber) 
Sintaxis: N <nl, n2> 
Descripción: Renumera las líneas 
comenzando por ni e incremen- 
tando un número n2 en el número 
de línea. 

* Comando O (Object) 
Sintaxis: O, 11 

Descripción: Graba en cinta código 
objeto. 

* Comando Q (Q delim) 
Sintaxis: O, 11 

Descripción: Cambia el separador 
de los argumentos por el primer ca- 
rácter de la cadena literal 11. 

* Comando R (Run) 
Descripción: Ejecuta el programa 
objeto, siempre que no haya habido 
errores durante el ensamblado. 

* Comando 5 (Substitute) 
Descripción: Sustitución de una ca- 
dena lineal. 

* Comando U (Upper Une) 
Descripción: Muestra el último nú- 
mero de línea. 

* Comando V (Verify) 
Sintaxis: V, 11 

Descripción: Verifica un fichero de 
texto. 

* Comando W (Write memory) 
Sintaxis: W ni, n2 
Descripción: Proporciona un listado 
en pantalla de contenido de me- 
moria entre ni y n2. 

* Comando X (teXt info) 
Descripción: Muestra las posiciones 
en decimal del comienzo y final del 
fichero de texto. 

* Comando Y (Y print length) 
Sintaxis: Y ni 

Descripción: ni nos dice el tamaño 
de la página del listado por impre- 
sora. 

* Comando Z (Z print text) 



Sintaxis: Z ni, n2 
Descripción: Listado por impre- 
sora. 

Cuando se utiliza el comando A 
(Assembly) del editor, el programa 
pide: 

TABLE SIZE: Cantidad de espacio 
para la tabla de símbolos y que ha de 
ser un número en decimal 

OPTIONS: Las opciones de ensam- 
blado, cuya respuesta debe ser un nú- 
mero decimal igual a la suma de las 
opciones que queramos y que a con- 
tinuación se estipulan 
opción l: listado de tabla de sím- 
bolos al final de la se- 
gunda pasada de ensam- 
blado 

opción 2: No genera código objeto 
opción 4: No realiza listado del en- 
samblado 
opción 8: Listado por impresora 
opción 16: Código objeto después 
de la tabla de símbolos 
opción 32: Suprimir comprobación 
acerca de donde se sitúa 
el código objeto 
GENMSX realiza el ensamblado en 



dos pasadas. Una halla los errores y 
compila la tabla de símbolos. Otra ge- 
nera código objeto. Si se detecta un 
error el ensamblado se detiene y no se 
produce la segunda pasada. 

El formato de cada sentencia en 
modo ensamblador (A) debe ser de la 
siguiente forma: 

ETIQUETA 
arranque: 

CODIGO 
LD 

OPERANDO 
HL, símbolo 

COMENTARIO 
; símbolo 

Cada línea se procesa de la siguiente 
forma: Si el primer carácter de la línea 
es un punto y coma (;) la línea se con- 
sidera un comentario y es ignorada 
por el ensamblador; si es un asterisco 
(*) se considera el carácter siguiente a 
dicho asterisco; si es CR (return) se ig- 
nora la línea. Pero si la línea comienza 
por un símbolo distinto a los tres an- 
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1. Desensamblado de una porción de memoria que abarca II instrucciones. 

2. El estado de registros. 

3. Contenido de memoria en hexadecimal (A), y ASCII (B) 
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Pantalla de MONMSX en comando 'S' 
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3'. estado de los registros en la parte 3' 



teriores, el ensamblador recorre la lí- 
nea en busca del símbolo (:); si lo en- 
cuentra todos los caracteres anteriores 
a éste serán interpretados como una 
etiqueta. Si el siguiente carácter no in- 
dica fin de línea o comienzo de un co- 
mentario (;), el ensamblador trata de 
interpretarlo como el comienzo de un 
cod-ope nemotécnico de un máximo 
de cuatro caracteres. 

Otra cosa que favorece la utilización 
del GENMSX, es que además de los 
cod-opes del Z-80, éste reconoce y 
añade otros pseudonemónicos, tales 
como: 

ORG,EQU,DEFB,DEFW,DEFS, 
DEFM,ENT 

o las pseudooperaciones condicionales: 

IF,ELSE y END 

Los comandos del ensamblador (no 
del editor) no actúan sobre el Z-8Ü ni 
sobre el código objeto, sólo modifican 
el listado del ensamblador. Un co- 
mando del ensamblador es una línea 
de fichero de texto, que comienza por 
el símbolo (*) y una letra mayúscula. 
Así existen los siguientes comandos: 
E, F, H, S, L, C, M. Este último *M 
lista (o no lista) las macroinstruccio- 
nes. 

Las macroinstrucciones son otra de 
las ventajas de usar GENMSX. Una 
macroinstrucción es una rutina for- 
mada por la unión de operaciones ele- 
mentales, pudiéndose utilizar hasta 32 
argumentos, numerados de O a 31 lla- 
mados parámetros. 



MON 

MONMSX es un desensamblador/ 
monitor que sirve para depurar pro- 
gramas en código máquina, convir- 
tiendo la pantalla en un tablero de 
control lleno de informaciones que 
nos permiten visualizar el estado in- 
terno del ordenador. 

MONMSX es reubicable, es decir, 
se puede cargar en cualquier parte de 
los 32K altos del mapa de memoria 
siempre que no entre en conflicto con 
el área de trabajo o la pila, es decir 
que lo podemos ubicar entre las direc- 
ciones &h81()() y &hD4()(). 



Si lo queremos ubicar en otro sitio 
que no sea a partir de la &hBl()(), que 
es como viene si lo cargamos con 
, LOAD"CAS:monmsx ,, ,r\ hemos de 
teclear lo siguiente: 

BLOAD"CAS:MONMSX",&HXXXX 

donde &HXXXX es la diferencia en- 
tre la dirección a partir de la que se 
quiere ubicar (dirección nueva) y 
&h88()(). Esto es: 

&HXXXX=&H(direc.nueva)- 
&h8800 

Para arrancar el programa se hace de 
la siguiente forma: 

DEFUSR = &H(direc. nueva) 
A=USR(&H(direc. nueva)) 

Este tablero de control puede ima- 
ginarse dividido en tres partes: 

La primera, situada en la parte su- 
perior izquierda, visualiza el desen- 
samblado de una porción de memoria 
que abarca once instrucciones. 

La segunda, en la parte superior de- 
recha, informa acerca del estado de 
los registros. 



La tercera y última, que abarca toda 
la parte inferior de la pantalla, nos 
muestra el contenido de memoria de 
un sector de ochenta bytes centrado 
en la posición 0. Ésta, a su vez, se sub- 
divide en contenido de la memoria en 
hexadecimal (subsector izquierdo) y 
contenido de la memoria en ASCII 
(subsector derecho). 

A continuación veremos que 
MONMSX posee una gran diversidad 
de comandos, lo que lo hace uno de 
los mejores desensambladores/moni- 
tores de la actualidad. 

Pasemos a comentar algunos de 
ellos: 

* Comando M 
Sintaxis: M:XXXX 
Descripción: Selecciona el puntero 
de memoria. Ello significa que se 
debe introducir la dirección de me- 
moria deseada (XXXX) cambiando 
el puntero a esa dirección. 

* Comando CURSOR DERECHA 
Descripción: Incrementa en uno el 
puntero y el panel de memoria. 

* Comando CURSOR IZQUIERDA 
Descripción: Decrementa en uno el 
puntero y el panel de memoria. 

* Comando CURSOR ABAJO 
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Descripción: Incrementa en ocho el 
puntero y avanza una línea el panel 
de memoria. 

* Comando CURSOR ARRIBA 
Descripción: Decrementa en ocho 
el puntero y retrocede una línea el 
panel de memoria. 

* Comando . 

Descripción: Avanza el punto (.) de 
arriba abajo en el panel de estado 
de registros cambiando el registro 
seleccionado. 

* Comando R 

Descripción: Copia el SP (puntero 
de pila) en el registro IR seleccio- 
nado en ese momento. 

* Comando CTRL + L 
Descripción: Desensambla a partir 
del contador del programa (PC). 

* Comando J 
Sintaxis: J: XXXX 
Descripción: Salto a la dirección 
XXXX del contador de programa 
(PC). 

* Comando Z 

Descripción: Ejecuta cada vez una 
instrucción de los registros y actua- 
liza la pantalla. 

* Comando / 

Sintaxis: FIRST (direc. co- 
mienzo bloque) 
LAST (direc. final blo- 
que) 

TO (direc. punto de 
destino) 

Descripción: Copia un 



bloque de memoria en 
otra parte de la memo- 
ria. 

* Comando P 

Sintaxis: FIRST (direc. comienzo 
bloque) 

LAST (direc. final blo- 
que) 

WITH (valor del byte) 
Descripción: Rellena un bloque de 
memoria con un byte determinado. 

* Comando G 

Sintaxis: G: XX XX XX XX (en he- 

xadecimal) 

G: M (cadena literal) 

G:% (código nemotécnico de una 

operación o de operandos) 
Descripción: Busca una sucesión de 
bytes en la memoria, a partir de la 
dirección que marca el puntero de 
memoria. 

* Comando N 

Descripción: Busca de nuevo una 
sucesión de bytes que se han intro- 
ducido con el comando G. 

* Comando S 

Descripción: Cambia el tipo de pa- 
nel de contenido de memoria. 

* Comando O 

Descripción: Salto relativo del pun- 
tero de memoria. 

* Comando U 

Descripción: Inverso del comando 

cr 

* Comando X 

Descripción: Salto absoluto del 



puntero de memoria. 

* Comando V 

Descripción: Inverso del comando 
X' 

* Comando CTRL + X 
Descripción: Devuelve el control al 
BASIC. Si se desea volver a 
MONMSX: 

DEFUSR = &HB800 
A=USR(0) 

Otros comandos del desensambla- 
dor son: 

* Comando CTRL + L 
Descripción: Desensambla a partir 
del puntero de memoria. 

* Comando CTRL + N 
Descripción: Desensambla la si- 
guiente página de memoria mos- 
trando las siguiente once instruccio- 
nes. 

* Comando CTRL + D 
Descripción: Desensambla un blo- 
que de memoria. 

* Comando CTRL + B 
Descripción: Dispone una interrup- 
ción en la dirección del puntero de 
memoria. 

* Comando CTRL + R 
Descripción: Suprime interrupcio- 
nes. 

* Comando CTRL + K 
Descripción: Modifica la configura- 
ción de los slots. 
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MATEMATICAS 
FACILES 



Philips ha lanzado al mercado un 
lote de programas para sus nuevos or- 
denadores MSX2. Entre ellos figuran 
de gestión odontológica, PH-Stat2, 
bases de datos, procesadores de tex- 
tos, juegos y el PH-Math2. A este úl- 
timo dedicamos, por su utilidad, este 
artículo. 

El PH-Math2 está pensado para su 
uso por los estudiantes de BUP, COU 
y los universitarios de carreras técni- 
cas. PH-Math2 se nos presenta como 
un lote de programas para aplicarlos a 
diferentes campos matemáticos. Está 
estructurado a partir de un menú prin- 
cipal a través del cual podemos acceder 
a los submenús de cada campo mate- 
mático determinado (funciones alge- 
braicas, funciones trascendentes, ope- 
raciones con matrices...). Además, 
dispone de la posibilidad de acceder a 



una calculadora en cualquier mo- 
mento, y así realizar las operaciones 
que creamos más oportunas para, des- 
pués, retornar al punto de donde ha- 
bíamos partido. Es decir, que si esta- 
mos operando con matrices y tenemos 
que hacer algún cálculo algo compli- 
cado, vamos a la calculadora, realiza- 
mos dicho cálculo, y volvemos al apar- 
tado de las matrices y podemos con- 
tinuar sin necesidad de reempezar ni 
pasar por el menú principal. 

Ahora vamos a ver con más detalle 
las posibilidades de este paquete ma- 
temático. 



FUNCIONES ALGEBRAICAS 

Este apartado trata las funciones 
polinómicas cuyos términos son del 
tipo a*X A n. En primer lugar, una vez 



hemos accedido a esta parte del pro- 
grama, tenemos que entrar la función 
con la que vamos a trabajar. El grado 
de la función debe estar entre 2 y 19. 
Una vez introducida, el ordenador nos 
la mostrará en pantalla. Ahora ya po- 
demos trabajar con ella y se nos pre- 
sentan las posibilidades de: genera- 
ción de funciones derivadas e integra- 
les, resolución de ecuaciones, raíces 
reales, raíces racionales, raíces ente- 
ras, cálculo de máximos y mínimos, 
representación gráfica, análisis de fun- 
ción y curvas asociadas, cálculo de 
áreas y volúmenes relativos a la curva 
de la función y preparación de trata- 
mientos estadísticos. Rápidamente 
comentaremos algunas opciones: 

— Derivadas: genera la función de- 
rivada de la función polinómica con la 
que estábamos trabajando. Una vez 
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calculada la función derivada, susti- 
tuye a la original a todos los efectos de 
cálculo. 

— Integrales: esta opción nos halla 
la primitiva de la función que nosotros 
introducimos. Es decir, si hacemos la 
derivada de ésta obtendremos la fun- 
ción que deseamos integrar. El tér- 
mino independiente adquiere el valor 
cero. Tras estas dos opciones podemos 
volver a la función original. 

— Resolución de ecuaciones: halla 
todos los valores de x para los que la 
función toma valor cero. Como el or- 
denador resuelve la ecuación a partir 
del método de Newton, son necesarios 
dos parámetros: la aproximación, con 
la que deseamos obtener el resultado, 
y las iteraciones o los ciclos de proceso 
a utilizar para cada solución. 

— Máximos y mínimos: el programa 
nos halla los puntos de la función 
donde se encuentra un máximo, un 
mínimo o un punto de inflexión. 

— Estudio puntual de la función: 
dado un valor de la función, el orde- 
nador nos da la imagen de este punto, 
la pendiente de la recta tangente en di- 



cho punto. En caso de ser cero nos 
dice si se trata de un máximo o de un 
mínimo, si la función es cóncava o 
convexa en el punto a estudiar, ade- 
más del termino del polinomio que ad- 
quiere mayor valor absoluto en ese 
punto, y dicho valor. 



FUNCIONES TRASCENDENTES 

Igual que en el apartado anterior, lo 
primero que nos pide el ordenador es 
que entremos en memoria la función 
con la que queremos trabajar. Esta 
parte del programa ya entra en con- 
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flicto con las limitaciones del Basic, 
lenguaje en que está descrito en su 
mayor parte. Y esto lo limita y en de- 
finitiva nos limita a nosotros mismos. 
Las opciones de este apartado son: 

— Resolución de ecuaciones por el 
método de aproximaciones sucesivas: 
para la resolución se nos piden tres pa- 
rámetros. El primero de ellos es el va- 
lor de ensayo de la ecuación; el se- 
gundo, la aproximación con que de- 
seamos el resultado; y el tercero, el 
mínimo de iteraciones a realizar. Una 
vez entrados todos estos datos el or- 
denador nos dirá para qué valores la 
ecuación es igual a cero. 

— Resolución de ecuaciones por tan- 
teo: los parámetros que se nos piden 
esta vez son el valor inferior del inter- 
valo en el que se busca la raíz, el valor 
superior, la aproximación y el límite 
de situación. Para utilizar este método 
es condición necesaria que la función 
sea continua en el cuerpo real. 

— Máximos y mínimos: busca los 



máximos y mínimos de la función a 
partir de los anteriores parámetros. 

Hallar el valor de la función en un 
punto, el área entre abcisas y volumen 
o hacer la representación gráfica son 
las posibilidades que completan este 
apartado del programa. 

CALCULO MATRICIAL Y 
SISTEMAS DE ECUACIONES 

Esta parte del programa nos per- 
mite trabajar de forma fácil y eficaz 
con las matrices, y es una de las más 
útiles. En primer lugar, dimensiona- 
mos y ponemos en memoria una, dos 
0 tres de las matrices que tenemos a 
nuestra disposición. Luego a partir de 
éstas podemos hacer las siguientes 
operaciones: 

— asignación del valor de una matriz 
a otra; 

— suma de dos matrices; 

— diferencia de dos matrices; 

— producto de dos matrices; 



— cuadrado de una matriz; 

— producto de una matriz por una 
constante; 

— matriz inversa; 

— matriz transpuesta; 

— matriz adjunta; 

— característica de una matriz; 

— mayor y menor de los valores ca- 
racterísticos de una matriz; 

— determinante de una matriz. 
ECUACIONES DIFERENCIALES: 

Este módulo nos permite resolver 
ecuaciones diferenciales a partir del 
método de Euler. 

RESOLUCION SERIES FOURIER: 
Este módulo, muy específico al 
igual que el anterior, tiene como única 
función el hallar los coeficientes de 
Fourier. Para ello tenemos que intro- 
ducir la función directamente en el 
Basic del programa, entre las líneas 
10000 y 1 1000 y luego continuar con la 
ejecución de éste pulsando Fl. Esto 
permite una mayor libertad y el poder 
introducir complicadas funciones. 
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CALCULADORA 

Antes ya habíamos hablado de una 
calculadora, pero de lo que ahora va- 
mos a tratar es de una calculadora 
científica, que se nos presenta como 
otra utilidad del programa y por esa 
razón es mucho más completa que la 
anterior, ta cual jugaba un papel au- 
xiliar. 

La calculadora científica tiene 36 
funciones específicas, más tres modos 
de Operación aritmética (decimal, bi- 
naria y hexadecimal) y dos modos de 
operación angular (grados o radia- 
nes). Aparte de estas posibilidades 
hay un indicador de errores y un ca- 
lendario. 



NUMEROS COMPLEJOS 

Este módulo trabaja con las varia- 
bles A v B. que son designadas así en 

58 INPUT 



el menú y en la pantalla de resultados 
de las operaciones. Al entrar los va- 
lores de A y B, primero debemos in- 
dicar la parte real y luego la imagina- 
ria. 

Las operaciones que podemos rea- 
lizar son: suma, resta, multiplicación y 
división. O bien hallar el inverso, el 
conjugado, el opuesto, las potencias 
de exponente entero, el exponencial 
de base e, el seno o el coseno, del nú- 
mero complejo. 

Éstas son las opciones más impor- 
tantes del programa, las que forman el 
cuerpo de éste, luego encontramos 
otras funciones auxiliares como catá- 
logo del disco, código impresora y co- 
pia archivo disco. Además de la inte- 
resante opción que permite al usuario 
definir un programa y acceder a él a 
partir de PH-Math2, para, después de 
usarlo, volver al menú principal del 
paquete matemático. 



Ya se nos advirtió, cuando salieron 
los ordenadores MSX, que su com- 
patibilidad sería ascendente, es decir, 
que todo el software y el hardware de 
los primeros ordenadores serviría para 
los posteriores, pero no sería posible 
el caso contrario. Y este programa 
cumple con esta regla. En primer lu- 
gar, el formato con el que nos lo pre- 
sentan es en disquet, así que si no se 
tiene una unidad lectora de disco ya 
no es posible contar con él. Y, en se- 
gundo lugar, todos los usuarios que 
dispongan de un MSX de primera ge- 
neración y se hayan comprado una 
unidad lectora de disco tampoco po- 
drán disponer de él, debido al mayor 
potencial del modo gráfico del MSX2 
que, por ejemplo, nos permite traba- 
jar con SO columnas. Finalmente de- 
seamos que este programa, realizado 
por DIMENSIONNEW, os ayude 
mucho en vuestros estudios. 
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COMPETICION EN EL 
BOSQUE 



DATOS GENERALES 



Si estos días vais por el bosque oiréis 
un gran revuelo, porque los animales 
están en plena competición. Los 
pingüinos han inventado un nuevo 
juego, y ahora ya se celebran los 
octavos de final. Los dieciséis 
supervivientes a las duras pruebas de 
clasificación aspiran a salir 
victoriosos. Nos hemos infiltrado 
para ver uno de estos partidos y 
verdaderamente éste es un juego 
original y emocionante. En un 
principio no parece gran cosa, pero a 
medida que pasan los minutos su 
atractivo crece. Y si te atreves a 
jugar, verás que desde dentro es 
todavía más emocionante. 




Al inicio se colocan cinco bolas en 
dos extremos opuestos de una mesa. 
Los jugadores se sitúan tras ellas, 
sobre una tarima y empiezan a 
lanzárselas. Ganará el participante 
que logre colocar todas las bolas en 
el campo de su adversario. Para 
lograr este objetivo todo está 
permitido, hasta derribar al contrario 
lanzando las bolas sobre el. Y, de 
hecho, éste es el único sistema para 
ganar. El público entervorecido jalea 
a los participantes y los anima desde 
las eradas, que están llenas a 
rebosar. Entre partida y partida el 
vencedor juega unas pantallas de 
bonificación, en las cuales solo se 
aumenta la puntuación de dicho 
jugador. Son como una recompensa 
al esfuerzo realizado. 
Los partidos se juegan al mejor de 
tres seis. Un set se acaba cuando 
todas las bolas se encuentran en uno 
de los extremos de la mesa. Pero si 
antes de que esto ocurra se agota el 
tiempo, ganará quien menos bolas 
tenga en su campo. En caso de 
empate se jugará un período extra 
con once bolas en limar de diez. 



★★★★★★★★★★★★★★★★★★★*★★★★★ 



TITULO: Penguin Wars 
FABRICANTE: Asen 

CLASE DE PROGRAMA: 

Juego 

FORMATO: Cartucho ROM 



CALIFICACION (Sobre 10 ptos ) 




LA PELICULA 
CONTINUA 



Una pandilla de chicos, llamados los 
Goonies, han encontrado el mapa de 
un tesoro en el ático de la casa de 
Mickey. Todos ellos, Mickey, Brand, 
Mouth, ( lunik y Data, más dos 
muchachas que se unen al grupo, 
Andy y Stef, deciden ir a buscar el 
tesoro de Willy el Tuerto, un famoso 
pirata de la región. Según el mapa, 
el tesoro se encuentra en la localidad 
costera de Cauldron Point, un lugar 
lleno de túneles y pasadizos secretos. 
Allí se esconde la banda de los 



Fratelli. que secuestra a la banda de 
los Goonies y los tienen prisioneros. 
Pero nadie parecía contar con Sloth. 
Este personaje, protagonista del 
juego, arriesgando su propia vida, se 
ha aventurado a rescatar a los 
Goonies y a encontrar el tesoro. Y 
para conseguirlo tendrá que luchar 
contra la banda de los Fratelli y con 
los peligros de las cuevas de los 
Muelles de (ioon. La primera misión 
de Sloth es liberar a los Goonies y 
sacarlos de sus celdas. Para ello 




tendrá que recorrer todas y cada una 
de las pantallas de los cinco niveles 
de que consta el juego, encontrar las 
llaves y abrir las diferentes celdas en 
que pueden hallarse encerrados sus 
amigos. Una ve/ conseguido todo 
esto, deberá hallar la puerta que les 
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conducirá hasta el próximo nivel. 
Allí, el calvario empezará de nuevo. 
Pero no os preocupéis, al final de 
cada nivel se nos revela una 
contraseña, que podemos utilizar 
cada vez que reanudamos el juego, 
para hacerlo a partir del último nivel 
al que llegamos. 

A partir de entonces el desenlace de 
la película dependerá de vosotros. 



★★**★*★★★★★★★★★★★★*★★★★★* 




TRATAMIENTO DE 
TEXTOS 



Idealogic nos presenta un procesador 
de textos sencillo pero eficaz. Tiene 
como mejor arma el fácil manejo y 
la presentación en 29 columnas, cosa 
que da un gran tamaño a las letras, 
lo que nos permite leer en pantalla, 
resaltándonos aún más los errores 
que podamos haber introducido en el 
texto. 

En la parte inferior de la pantalla 
visualizamos toda la información 
necesaria para trabajar con el 
procesador. Es decir, línea y 




columna en que está el cursor, 
memoria libre que nos queda y los 
títulos de los cinco menús del 
programa. Estos menús son de 
acceso directo y sólo se ha de pulsar 
una de las cinco teclas de función 
para visualizarlos en pantalla. Con 
Fl accedemos al menú que nos 
permite trabajar con bloques de 
texto, y consta de ocho interesantes 
posibilidades: inicio de bloque, final 
de bloque, borrar, copiar, grabar, 
insertar, mover o limpiar el bloque 
señalado. Gracias a F2 visualizamos 
el menú de disco o de cinta, según 
nos convenga. Básicamente nos 
permite almacenar y recuperar 
textos. F3 llama a pantalla al menú 
de búsqueda, que nos permite 
escoger entre una de las siguientes 
opciones: poner etiquetas, salto de 
etiquetas, buscar una palabra o 
sustituir una palabra. Para acceder al 
menú de controles de impresora 
debemos pulsar F4, y con F5 vamos 



DATOS GENERALES 

TITULO: Ideatext 
FABRICANTE: Idealogic 

CLASE DE PROGRAMA: 

Procesador de textos 

FORMATO: Cartucho ROM 



























CALIFICACION (Sobre 10 ptos .) 



ORIGINALIDAD: 

INTERES: 

GRAFICOS: 

COLOR: 

SONIDO: 



TOTAL: 



37 



directamente al menú llamado: 
visualizar. Éste tiene como primera 
opción el paso del texto a la 
impresora, y como segunda la 
visualización de cómo quedaría el 
texto en un folio. Ésta viene a suplir 
los inconvenientes que tiene trabajar 
en 29 columnas. 
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LA DULCE BELLOTA 

í 




Una bellotita se ha perdido en un 
jardín encantado y nosotros debemos 
ayudarla a encontrar el camino de 
salida. El jardín está lleno de 
desconocidas y peligrosas criaturas: 
los Peepas, que no son más que 
judías y pimientos que intenta 
comérsela. Estos enemigos cambian 
de actitud según sea su color. Éstos 
intentarán atacar a nuestra pobre 
bellota, que sólo puede defenderse 
lanzándoles unas piedras que lleva en 
los bolsillos. La bellota controla la 
fuerza con que lanza las piedras. 





pero lo que no sabe es que éstas irán 
rebotando por toda la pantalla hasta 



agotar su energía, alcanzar a un 
Peepa o a ella misma, de modo que 
se habrá producido un suicidio. 
Además, en la pantalla encontramos 
los Bop-Bumpers. Unos cuadrados 
que siempre permanecen quietos, 
pero igualmente las piedras rebotan 
en ellos y al hacerlo los Peepas se 
vuelven más peligrosos y nos lo 
demuestran cambiando de color, 
pero ahora al matarlos lograremos 
una mayor puntuación. Al acabar 
con todos los Peepas de una pantalla 
pasamos a la siguiente y así 
sucesivamente hasta lograr llevar a la 
pequeña bellota de nuevo a casa. 



*★★★★★★★★★★★★★*★★★★★★★**★ 



DISPARA, DISPARA, 
DISPARA 



Knightmare es uno de esos juegos 
que te sorprenden por su calidad, 
una calidad a la que ya nos tiene 
acostumbrados Konami, pero una 
vez más les debemos felicitar. El 
programa es un juego de arcade. 
pero hecho con mucha imaginación y 




buen gusto. Para poneros un ejemplo 
os diremos que el juego tiene una 
tecla de pausa, y al activarla el 
guerrero protagonista se pone a 
dormir bien protegido por una 
manta, y hasta parece roncar. Y este 
realismo se encuentra en todo el 
juego. Los gráficos son originales y 
su diversidad es tal que resulta 
imposible describir a todos los 
enemigos que encontramos a través 
de los ocho niveles del juego. Pero 
es necesario destacar a unos en 
concreto, los cuales llegaréis a odiar: 
son los que encontramos al final de 
cada nivel y sólo si logramos 
matarlos pasaremos de pantalla. La 
parte sonora del programa tampoco 
desentona con la alta calidad del 



I 



DATOS GENERALES 

TITULO: Knightmare 
FABRICANTE: Konami 

CLASE DE PROGRAMA: 

Juego 

FORMATO: Cartucho ROM 





CALIFICACION 


(Sobre 10 ptos i 


ORIGINALIDAD: 


9 


INTERES: 


9 


GRAFICOS: 


9 


COLOR: 


8 


SONIDO: 


8 


TOTAL: 


43 
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juego en general. En todo momento 
hay una música de fondo y sobre 
ésta se oyen los sonidos que se 
producen al hacer cosas específicas, 
como son: disparar, matar o 
conseguir una vida extra. Los 
componentes adicionales del 
programa son diversos, y ahora 
resaltaremos algunos. Cambio de 
arma: una bola mágica nos permite 
seleccionar nuestra arma preferida, 
dentro de la amplia gama que se nos 
ofrece. Los pasadizos secretos: a lo 
largo de nuestro camino hay 
escondidos unos pasadizos secretos y 
si los descubrimos tenemos la 
posibilidad de pasar directamente de 
nivel, esquivando un montón de 
dificultades. Los puentes secretos: en 
los niveles superiores antes de cruzar 
un río debemos encontrar dónde se 
hallan los puentes, de lo contrario 
acabaremos ahogados en el agua. 




★★*★★★**★★★★★★★★★★★★★★★★★ 



LA BATALLA GALACTICA 




El programa que comentamos a 
continuación no se encuentra en el 
mercado español, pero creemos que 
es interesante ir informando de 
cuáles son los programas que van 
surgiendo allende nuestras fronteras. 
Ya que si tenéis la oportunidad de 
acceder a estos mercados sabréis qué 
programas os pueden resultar mas 
interesantes. 

El programa en cuestión se llama 
Zanac. Es un juego de arcade y más 
concretamente un 

«masacramarcianos». Pero lo que le 
diferencia de otros muchos 
programas de esta misma clase es su 



calidad. Si alguna cosa en concreto 
podemos destacar es el punto justo 
en que están escogidos los elementos 
que lo componen, ni le faltan ni le 
sobran cosas. 

Al empezar la partida vemos una 
pequeña nave en la parte inferior de 
la pantalla, la cual posee dos 
potentes disparos. El primero es un 
eficaz láser y el segundo es un 
disparo adicional, el cual podemos ir 
cambiando a lo largo de la partida. 
El nivel al que jugamos lo podemos 
escoger nosotros mismos durante la 
partida. En un principio jugamos al 
nivel 0 y el láser lanza un único 
disparo, pero si lo deseamos y somos 
suficientemente hábiles podemos ir 
aumentando el número de disparos 
de nuestro láser hasta lograr el 
máximo que son tres. Imaginaros un 
arma triple más un disparo adicional, 
es lógico pensar que lo arrasaremos 
todo. 

Pero no es así, porque ahora 
estaremos en el sexto nivel y los 
enemigos no nos dejarán ni respirar. 
Además, el juego consta de rounds. 




y en cada round cambian los 
enemigos y se vuelven más peligrosos 
y agobiantes. La única salida es 
elevar nuestra habilidad. 
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AL SERVICIO DE LA RAF 



Seguro que ya conocéis este 
programa de la U.S. Gold o habéis 
oído hablar de él. Y es que su fama 
no es fruto de la casualidad. 
Dambusters es un juego de estrategia 
y un simulador de vuelo a la vez, 
que se basa en una legendaria misión 
que llevó a cabo el Escuadrón 617 
durante la Segunda Guerra mundial, 
sobre un objetivo alemán. Debido a 
la gran dificultad del juego, se nos 
permite empezar desde tres niveles 
diferentes. El nivel más sencillo, 
«Practicar aproximación a la presa», 
nos acerca al objetivo sin 
preocuparnos de los ME110, de los 
reflectores ni de los globos. El 
segundo nivel de dificultad, «Opción 
teniente de vuelo», nos sitúa ya en el 
aire, encima del canal de la Mancha. 
Pero esta vez ya no estaremos solos: 
los enemigos estarán persiguiéndonos 
y nos harán la vida imposible. El 
tercer y último nivel, «Opción jefe 
de escuadrilla», ya no nos da 
ninguna facilidad. Todo depende de 
nosotros, despegar, seguir el mejor 
rumbo posible, despistar a los 
enemigos y llegar a destruir nuestro 
objetivo. Os aseguro que esto no es 
nada fácil, ya que solos tenemos que 




hacer el trabajo de toda la 
tripulación. Presionando las teclas 
numéricas del 1 al 8 accedemos a las 
siguientes pantallas: 1. piloto: 2. 
artillero: 3. artillero trasero: 4. 
bombardero: 5. navegador: 6. 
pantalla del primer ingeniero: 7. 





pantalla del segundo ingeniero, y 8 X . 
informe de situaciones y daños. 
Cuando una de estas posiciones se 
encuentra en dificultades 
parpadea en la parte inferior 
de la pantalla el número 
correspondiente. 



FINTA, SALTA, Y... CANASTA 



Dinamic, basándose en el jugador de 
la NBA, Fernando Martín, ha creado 
un juego relacionado con el deporte 



del básquet. El juego sigue las reglas 
y las normas del básquet* pero sólo 
se enfrentan dos jugadores. Tenemos 



dos opciones, jugar contra el 
ordenador o hacerlo un jugador 
contra otro. En ninguno de los dos 
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casos existe la opción de seleccionar 
un nivel de dificultad. 



El partido se desarrolla en un campo 
que reúne todas las condiciones 
necesarias, y un numeroso público 
aplaude nuestras jugadas. Si 
observamos a Fernando 
aprenderemos a realizar todos los 
movimientos que él ejecuta con una 
perfección envidiable. Bota con la 
mano derecha, con la izquierda, 
finta, realiza giros en el aire y 
encesta gracias a un gancho o 
machacando el balón en el aro. 
Debido a que jugamos en la NBA 
seguimos la norma que allí rige 
respecto al número de personales, es 
decir, se nos expulsa al cometer la 
sexta personal y no la quinta como 
sucede en la FIBA. Además de las 
faltas personales se nos penalizan 
otras infracciones, como los pasos, 
los dobles 0 el campo atrás. 
Además del juego destaca la 
presentación que le precede. En ella 
vemos una caricatura de Fernando 
Martín que mientras nos sonríe hace 
malabarismos con un balón. Si os 



DATOS GENERALES 

TITULO: Fernando Martín 
FABRICANTE: Dinamic 

CLASE DE PROGRAMA: 

Juego 

FORMATO: Cassette 



CALIFICACION (Sobre 10 



ptos ) 



ORIGINALIDAD: 

INTERES: 

GRAFICOS: 

COLOR: 

SONIDO: 



TOTAL: 



35 



animáis a jugar quizás os vea Díaz 
Miguel y os coloque en la selección. 



★*★★★★★★★*★*★★★★★★★★★*★*★ 



MISION SUICIDA 



El servicio de inteligencia de nuestro 
ejército nos ha seleccionado para 
llevar a cabo una dura y difícil 
misión. Nosotros, orgullosos de 
haber sido seleccionados como el 
soldado idóneo para una misión de 
tanta importancia, hemos aceptado 
rápidamente. Después de unas duras 
semanas de entrenamiento, v sin 





saber aún el objetivo de la misión, ni 
el plan a seguir, nos han comunicado 
que mañana volaremos hasta el 
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objetivo. A la mañana siguiente nos 
proporcionan una ametralladora y 
cinco granadas. Al alcanzar el campo 
enemigo nos hacen saltar del 
helicóptero y nos mandan destruir al 
máximo esas instalaciones y liberar a 
los compañeros que están allí presos. 
Hemos aceptado una misión suicida 
y ahora ya no podemos renunciar a 
ella, aunque esa idea en ningún 
momento ha pasado por nuestra 
cabeza. Ahora sólo dependemos de 
nosotros mismos y de una vieja 



DATOS GENERALES 

TITULO: Who Dares Wins II 
FABRICANTE: Alligata 

CLASE DE PROGRAMA: 

Juego 

FORMATO: Cassette 



CALIFICACION (Sobre to 



ptos.) 



ORIGINALIDAD: 
INTERES: 
GRAFICOS: 
COLOR: 
SONIDO: 



TOTAL: 



33 



ametralladora. Los enemigos, 
desorientados, caen como moscas. 
Somos como un huracán, nada se 
resiste a nuestro ataque. A medida 



revista de Software^ 




que avanzamos en el campamento 
enemigo encontramos coches. 



helicópteros, casetas y fortines, cosas 
que tenemos que destruir. Además 
de nuestros compañeros, a punto de 
ser ejecutados, o de granadas de 
repuesto. En nuestra mente sólo 
existe una idea: avanzar y destruir. 
Pero todo tiene su fin, y bien por 
cansancio o por mala fortuna una 
bala nos alcanza y caemos allí 
mismo, pero sabiendo que hemos 
cumplido con nuestra misión. 
Esta historia ha sido creada 
por Alligata en una versión 
para MSX de este tipo de 



juegos. Prepárate, tu vida dependerá 
de ello. 



EL ROMPECABEZAS 

1 





Confused es un rompecabezas 
llevado a cabo de forma muy 
original, gracias a que aprovecha las 
ventajas de estar hecho por 
ordenador. En un primer menú 
podemos escoger entre diez figuras 
diferentes, y si queremos las 
visualizaremos en pantalla. Éstas las 
podemos dividir desde en cuatro 
hasta noventa y seis cuadrados. 
Después de haber pasado por el 
menú principal y haber hecho la 
selección de todos los datos, 
podemos empezar la partida. No se 
trata de un rompecabezas 
convencional, las fichas no tienen 
una imagen asignada, sino que por 
ellas corren las imágenes, y tenemos 
que ponerlas de tal manera que la 
imagen siga su curso en el dibujo y 
no quede partida o aparezca por el 
otro extremo, formando una figura 
incoherente. Para llegar a formar el 
rompecabezas tenemos unos 
comandos de ayuda: visual ización de 



la imagen, inversión de los cuadrados 
0 paralización de la imagen. Además 
de una opción de ayuda, que coloca 
los cuadrados que escojamos en su 
debido lugar. Si nos rendimos 
podemos volver directamente al 
menú principal. 

Mediante una flecha, dirigida por los 
cursores, podemos acceder a todos 
los controles, sin necesidad de tener 
que tocar ninguna de las otras teclas. 
Esto da una gran agilidad al 
programa y nos facilita su manejo. Si 





disponéis de tiempo y tenéis ganas 
de volveros locos delante del 
ordenador, este programa os 
satisfará. 
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Vendo/cambio juegos MSX; poseo 
Knight Lore, Jack the Nipper, Gunfright 
y otros (15 más). 
José Luis Canales 

La Concha de Villaescusa (Cantabria). 



Vendo Philips VG-801o MSX con unos 
40 programas (ALIEN-8, JACK THE NIP- 
PER, BATMAN, TENNIS, PROFANA- 
RON, KNIGHTMARE, CAMELOT WA- 
RRIORS, GOLF, THE WAY OF THE Tl- 
GER, etc.), Interface Centronics, Am- 
pliación 64K, cassette, cables, manua- 
les. Todo por 22.000 ptas. Llamar a: 
Javier Torres TI : (91 ) 204 43 1 5. C./ Vir- 
gen de la Oliva n.° 42, 28037 Madrid. 



Vendo Cartucho de Expansión de Me- 
moria de I6K (SONY) por 4.000. Diri- 
girse a: Mercedes Muñoz, C./ Teruel n.° 
9, 3.° 6. a TI: 363 93 00 (horas de oficina) 
46008-Valencia. 



Intercambio programas, trucos e ideas 
para el sistema MSX. Dirigiros a: Diego 
Sánchez Alonso, C./ Montoya n.° 1, 7.° 
B Alcantarilla (Murcia) 30820. 



Intercambio programas MSX en disco 
de 3 V 2 pulgadas. Irene Juardos Revilla, 
C./ Garita n.° 19,07015-Palma de Ma- 
llorca. TI: (971) 40 36 59. 



Intercambio programas, trucos e ¡deas 
con usuarios de MSX. Poseo todos los 
de Kowami, Gremlim Graphics, Diña- 
rme, Ultímate, etc. Enviar lista. Escribir 
a: Pablo Fernández Mastache, C./ Gran 
Vía n.° 104, 3.° B.36203 Vigo (Ponteve- 
dra). 



Compro cartucho de ampliación de me- 
moria de 16K (que no supere las 6.000 
ptas.) o bien de 64K (que no supere las 
15.000 ptas.) Manuel García Solano, C./ 
Ballesteros Villanueva n.° 1, Orihuela 
(Alicante). 



a zoco 

Vendo ordenador SONY HIT BIT 75P, 
64K (teclado profesional, manuales y 
cables). Poco uso, comprado hace un 
año. Precio 43.000. Además regalo 
base de datos (DATABA) y procesador 
de textos (COMPOR) de Philips. Luis 
Miguel Sastre, C./ Espoz y Mina n.° 15, 
3.° D-31200-Estella (NAVARRA). 



Compraría ampliador de memoria para 
HIT BIT SONY MSX de 64K y también 
cartuchos de juegos. 
Iván Regalado, CV Concepción Arenal 
n.° 136 entlo 1.° 08027 Barcelona. TI: 
340 01 41. 



Cambio 20 títulos primeras marcas 
(Knight, Alien, Gunfright, Hyperl y II, 
Boxing, Yie, Biliards...) por uno de los 
siguientes juegos: (Green Beret, Night 
Mare, The Goonies, Yie II, Tennis Ko- 
nami, Golf Konami, Grog's Revenge 
(originales o no) y además VENDO An- 
tartic Adventure, Track & Field II, 
Senjyo, Chiller, Finders Keepers (todos 
originales) por 9.500 ptas. También los 
vendo por separado. Llamar o escribir 
a: Rafael López Fernández, C./ Indíbil y 
Mandonio n.° 34, 3.° 2. a 25003 Lérida. 
TI: (973) 26 26 54. 



Vendo, compro e intercambio progra- 
mas MSX, MSX-DOS y CP/M en disco 
3.5", estoy interesado especialmente 
en aplicaciones. Poseo WORDSTAR, 
L80, M80, SUPERCALC, etc. Todos ex- 
celentes programas CP/M, y más de 
200 programas MSX comerciales. Os- 
car Vallejo Marcelo. Avd. Madrid n.° 9, 
3.° 3. a esc. C. 08028 Barcelona. 



Vendo ordenador MSX SONY HB 55P 
por 35.000 ptas. Incluyo ampliación de 
memoria 16K y cassette, así como car- 
tucho de juego Tennis y otros en cinta, 
Interesados llamar al ti: (93) 211 42 24 
de Barcelona. 



Intercambio toda clase de programas 
(más de 200) en código máquina. Es- 
cribir a: Miguel Jiménez Pizarro, C./ 
Morenito de Algeciras n.° 4, 4.° C. Al- 
geciras (Cádiz). TI: (956) 60 45 86. 



Vendo ordenador MSX Panasonic 
CF2700,80 Kram, espacio para dos car- 
tuchos (comprado hace dos meses), 
manuales y revistas sólo por 27.950 pe- 
setas. 

Llamar al teléfono (93) 331 99 02 Bar- 
celona. 



Cambio monitor DYNADATA fósforo 
verde, con contraste, brillo y volumen 
(en perfecto estado) y algo de dinero, 
por monitor en color. 
Escribir a: Jesús Mingorance Aguilera, 
C./ Mulhacén n.° 9-11 18005 Granada. 
TI: 25 20 03. 



Intercambio juegos de código máquina 
(Goonies, BatMan, etc.), casi todos los 
de Konami. Ignacio Aguilera Espejo, C./ 
Sevilla n.° 16. Mairena del Aljarafe (Se- 
villa). 



Intercambio programas MSX, tengo los 
mejores títulos. Konami, Erbe, Activi- 
sion... Juan Carlos Patricio Asensio, C./ 
Rodrigo Pertegás, n.° 48, 11.°. 46023 
Valencia. 



Vendo juegos MSX entre ellos (Knight 
Lore, Boxing, Camelot Warriors, Night- 
mare...etc) a precio muy barato. Envíos 
contra reembolso. Escribir a: Mari Car- 
men Alonso Tomás, C./ San José de la 
Vega n.° 9, 9.° 46011 Valencia. 



Intercambio bibliografía y SOFTWARE 
de gestión en cinta para MSX o Philips 
P200. Sebastián Briones Moyano C./ 
Pintor Carbo n.° 2, P.° 5, P. a 10. Caste- 
llón 12003. TI : (964) 22 33 23. 



Intercambio programas MSX tanto en 
cinta como en disco 3.5" sin interés 
económico. Enviar relación. Luis 
Amado Regó, C./ Puente, 25-3. 36500- 
Lalin. Pontevedra. 



Vendo ordenador MSX X'PRESS, uni- 
dad de discos incorporada, de 3.5", 
más de 40 juegos, Joystick, sistemas 
operativos CP/M y MSX-DOS, cassette, 
manuales, libros y revistas, todo por 
67.000 ptas. 

TI: 311 44 14. Preguntar por Gabi, de 19 
a 22 h. 



Atención Zx Spectrum Plus, con todos 
sus accesorios y manuales, más ínter- 
face Kempston y joystick Quick Shot II, 
todo en perfecto estado y con embala- 
jes originales; revistas Microhobby (co- 
lección completa) con curso de Basic y 
C/M, juegos originales de calidad y 
curso de Basic de Investrónica. Todo a 
un precio estupendo. Llama al teléfono 
(976) 51 07 15, Zaragoza. 



NO OLVIDES EL 
TELEFONO... S 

Cuando, por cualquier moti- 
vo, nos escribas, no olvides in- 
dicar tu número de teléfono. Así 
nos será más fácil y rápido po- 
nernos en contacto contigo. 
Gracias. 
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¡¡LU5> IVItüA MI Ib MSX ! 




DEVS EX MACHINA 

ttKITttS \SI> DIKK IM) B> MU (KOlCHtK /V\SX 











¡LA AUDIO-VIDEO AVENTURA MAS 

CREADA...! 


ALUCINANTE JAMAS 





Disponibles en: 
CASSETTE 
V 

DISCKETTE 



EL TUNEL DEL TIEMPO 

Es un ameno juego educativo que nos proporciona la oportunidad 
de viajar a través del tiempo y del espacio, recorriendo las tierras de 
nuestro planeta y contactando con los personajes y acontecimientos 
más relevantes de las distintas eras históricas. 



w » 




miND same 

ATAULFO saquea el reino de su hermano, el rey LEONARD. y deja 
en el castillo unos seres encantados para destruir al rey LEONARD 
e impedirle el paso a la sala de los tesoros. 




Los malignos han esparcido las fórmulas secretas del gran mago 
Merlin, por todos los rincones de su inmenso castillo. ¿Podrás ayu- 
darle a recuperarlas, para que pueda fabricar la piedra Filosofal? 



A 



VISITE LA DIVISION OnL;^ Cs£7 

GALERIAS 



Marcando estilo. 

Y EN TODOS LOS DISTRIBUIDORES DE NUESTROS PRODUCTOS 



Editado y distribuido en España por: 
Mariano Cubi. 4 Entio. Tei 21 X 3400 - 08006 Barcelona 



te ofrece el mejor programa 
de simulación de vuelo 
creado hasta la fecha. 




A FLIGHT >J& f' 
SIMULATION 



MSX *n 

aMST ÍoSe 



c0 mM° d 



El Spitfire 40 no es sólo el mejor simulador de vuelo de los aviones 
más famosos de todos los tiempos, también es una espectacular 

aventura de guerra. 
La escena es el verano de 1940 y tú eres un piloto recién entrenado, 

destinado en un Escuadrón Spitfire en algún lugar del Sureste 
de Inglaterra. Como uno de tantos jóvenes en 1940, aprenderás que 
un Spitfire no es un avión corriente, descubrirás sus especiales 
capacidades y lo más importante de todo, cómo manejarlo 

durante el combate. 

****** 



Si deseas información y participar en los 
importantes sorteos que ZAFICHIP celebrará 
durante el año. . . ¡ESCRIBENOS! 



* * \!n\aotac¿s*en tu Rienda 
Si están ^^njioSU _ „ 

h*«^«ÍT*** ****** 



ZAFIRO SOFTWARE DIVISION 

Paseo de la Castellana, 141. 28046 Madrid 

Tel. 459 30 04. Tel. Barna. 209 33 65. Télex: 22690 ZAFIR E 



Editado, fabricado y distribuido en España 
bajo la garantía Zafiro. Todos los derechos 
reservados. 



